Question

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

Answer 1

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