Одним из способов во время разработки является использование элемента управления Label и установка его высоты или ширины в
1 (2px и 3D-граница дают хороший точеный эффект). Или же вы можете рисовать вручную, используя GDI:
Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
Dim formGraphics as System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
formGraphics.DrawLine(myPen, 0, 0, 200, 200)
myPen.Dispose()
formGraphics.Dispose()