Вывести на экран таблицу умножения - VB

Option Explicit
Dim I, j, p As Integer
 
Private Sub Command1_Click()
    For I = 1 To 19 'строки
            For j = 1 To 10 'столбцы
                p = I * j
                Print I; "*"; j; "="; p,
            Next j
    Print
    Next I
 
End Sub