Создать простую циклическую программу для таблицы умножения - VB

Private Sub Command1_Click()
For a = 1 To 10
    For b = 1 To 10
        proizv = a * b
        Print a; "*"; b; "="; proizv,
    Next b
    Print
Next a
End Sub