У формы есть метод Line. Этот метод идет еще от BASIC для DOS и работает по тем же правилам. Сначала нам нужно установить режим отображения формы. Потом воспользоваться методом Line для рисования линии.

Private Sub Command1_Click()
    Form1.ForeColor = &HFF&
    Form1.Line (0, 0)-(100, 100)
End Sub

Private Sub Form_Load()
    Form1.ScaleMode = 3
End Sub

Запускаем, смотрим: