ユーザーコントロール（クラス）越しにDrawEllipseで円を描くには・・・

[WindowsApplication1]
　├　Form1.vb
　└　UserControl1.vb

[Form1.vb]**************************************
UserControl11　が一つだけ貼り付いています。

Public Class Form1

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.UserControl11.DrawEl()　　'�@ここでは何も描かれない
    End Sub
End Class

[UserControl1.vb]**************************************
PictureBox1とButton1以外は貼り付いていません。

Public Class UserControl1
    Public Sub DrawEl()
        Dim g As Graphics = Me.PictureBox1.CreateGraphics()
        g.DrawEllipse(Pens.Black, 10, 10, 50, 50)
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim g As Graphics = Me.PictureBox1.CreateGraphics()
        g.DrawEllipse(Pens.Black, 20, 20, 50, 50)    '�Aこれは成功する
    End Sub
End Class

    Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As PaintEventArgs) Handles PictureBox1.Paint
        CreateGraphic(e.Graphics)
    End Sub