Разработать консольную программу на vb, которая вводит числа m и n , а затем выводит на экран заполненный прямоугольник из звездочек размером m на n (m строк по n звездочек)

Sub mm()
M = Cells(2, 7)
N = Cells(2, 15)
For i = 1 To N
    For J = 1 To M
        Cells(J + 3, i) = "'*"
    Next J
Next i
End Sub