مشكلة في اظهار الصورة

myDrawing()
End Sub
Public Sub myDrawing()

ty = 0
Dim g As System.Drawing.Graphics
g = Me.CreateGraphics
Dim i As Integer
Dim brush As System.Drawing.SolidBrush
Dim rect As Rectangle
brush = New System.Drawing.SolidBrush(Color.Green)
Dim Angles() As Single = {0, 43, 79, 124, 169, 252, 331, 360}
Dim colors() As Color = {Color.Red, Color.Cornsilk, Color.Firebrick, Color.OliveDrab, Color.LawnGreen, Color.SandyBrown, Color.MidnightBlue}
For i = 0 To 3 Step 1
rect = New Rectangle(100, 10 + ty, 300, 300)
Dim angle As Integer
For angle = 1 To Angles.GetUpperBound(0)
brush.Color = colors(angle - 1)
g.FillPie(brush, rect, Angles(angle - 1), Angles(angle) - Angles(angle - 1))
Next
g.DrawEllipse(Pens.Black, rect)
ty += 100
Next

g.Dispose()
g = Nothing

End Sub