vb.net - VB.NET VisualStyleRenderer がまったく機能しない

Question

ここで私の間違いを見た人はいますか？

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
    Dim renderer As VisualStyleRenderer
    renderer = New VisualStyleRenderer(VisualStyleElement.Button.PushButton.Normal)

    Dim nRect As New Rectangle
    nRect = Rectangle.FromLTRB(0, 0, 100, 100)

    renderer.DrawBackground(Me.PictureBox1.CreateGraphics, nRect)
    Me.PictureBox1.Invalidate(True)
End Sub

Answer 1

決して利用してはいけませんCreateGraphics()。次にコントロールが自分自身を描画するときに消去されます。

Paint代わりに、イベントを処理して を描画する必要がありますe.Graphics。