This code sample shows how to draw a rectange in picture box.
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim G As Graphics
G = PictureBox1.CreateGraphics
G.DrawRectangle(Pens.Aqua, 125, 125, 275, 150)
G.FillRectangle(Brushes.Beige, 125, 125, 275, 150)
End Sub
|
No responses found. Be the first to respond and make money from revenue sharing program.
|