Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Protected Overrides Sub OnPaintBackground(ByVal e As PaintEventArgs)
- MyBase.OnPaintBackground(e)
- Dim rect As New Rectangle(0, 0, Me.ClientSize.Width - 1, Me.ClientSize.Height - 1)
- e.Graphics.DrawRectangle(Pens.Black, rect)
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement