Disegnare un rettangolo di bordo nel form

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.SetStyle(ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)


End Sub


Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
' Make a margin rectangle.

Dim rect As New Rectangle(10, 10, Me.ClientSize.Width - 20, Me.ClientSize.Height - 20)
End Sub