Create 5 Point Star with e.graphics but set the x and y start position to 110,110 in VB.NET - vb.net

Question

I need to create a small 5 point star that is 15 points wide by 15 points high, where the x starting position is 110 and the y starting position is 110 on my print document.
the code I found online so far creates a star, but in the top left corner at 0,0 position.
' Make the points for a star.
Dim pts(4) As Point
Dim cx As Integer = 15 \ 2
Dim cy As Integer = 15 \ 2
Dim theta As Double = -Math.PI / 2
Dim dtheta As Double = Math.PI * 0.8
For i As Integer = 0 To 4
pts(i).X = CInt(cx + cx * Math.Cos(theta))
pts(i).Y = CInt(cy + cy * Math.Sin(theta))
theta += dtheta
Next i
e.Graphics.FillPolygon(Brushes.Black, pts)
how do i now move the star graphic to position x.110 y.110?

Answer 1

Try using the sources below.
Private Sub DrawStar(ByVal prm_StartX As Integer, ByVal prm_StartY As Integer)
Try
Dim pts(4) As Point
Dim cx As Integer = prm_StartX
Dim cy As Integer = prm_StartY
Dim theta As Double = -Math.PI / 2
Dim dtheta As Double = Math.PI * 0.8
For i As Integer = 0 To 4
pts(i).X = CInt(cx + 7 * Math.Cos(theta))
pts(i).Y = CInt(cy + 7 * Math.Sin(theta))
theta += dtheta
Next i
Dim Pen As New Pen(Color.Red, 2)
' Draw
Dim formGraphics As System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
formGraphics.DrawPolygon(Pen, pts)
Pen.Dispose()
formGraphics.Dispose()
Catch ex As Exception
End Try
End Sub
Private Sub Toy1Form_MouseClick(sender As Object, e As MouseEventArgs) Handles Me.MouseClick
DrawStar(e.X, e.Y)
End Sub