お世話になります
VB6からVB2005の移植でPictureBoxのクリアが出来なくて悩んでいます
VB6では.Clsで簡単に出来たのですが・・・・
コードは↓ですが　　.Image = Nothing　を入れると表示されません
これをコメント行にするとOKです（重複表示ですが）このサブルーティンに来る前に実行しても駄目
でした
tipsにあった例題を使っても同じ結果です

    Sub DrawCircle(ByRef deg As Double)
        Dim pai, XX2, XX, YY, YY2, ToRadi As Single
        Dim g As Graphics = PictureBox1.CreateGraphics()
        pai = 3.14159265358979
        ToRadi = pai / 180
        With PictureBox1
            .Image = Nothing
            XX = (.Right - .Left) / 2
            YY = (.Bottom - .Top) / 2
            XX2 = XX + YY * System.Math.Sin(deg * ToRadi)
            YY2 = YY + YY * -System.Math.Cos(deg * ToRadi)
            g.DrawLine(Pens.Blue, XX, YY, XX2, YY2)
            g.DrawEllipse(Pens.Red, 0, 0, .Right - .Left, .Bottom - .Top)
        End With
        g.Dispose()
    End Sub

>.Image = Nothing

GraphicsクラスのClearメソッドでクリアすればよいのでは？

g.Clear(Color.Black)

pictureboxにこだわってGraphicsクラスまで及びませんでした！
g.Clear(Me.BackColor)
で解決しました
有り難うございました

> >.Image = Nothing
>
> GraphicsクラスのClearメソッドでクリアすればよいのでは？
>
> g.Clear(Color.Black)