0

ボタンをクリックして長方形を描こうとしていますが、思ったほど簡単ではありません。

Private Sub Button36_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button36.Click
    ' Create pen. 
    Dim blackPen As New Pen(Color.Black, 1)

    ' Create rectangle. 
    Dim rect As New Rectangle(10, 710, 35, 100)

    ' Draw rectangle to screen.
    Me.CreateGraphics.DrawRectangle(blackPen, rect)
End Sub

私はVB.NETを使用しています

4

1 に答える 1