Как освоить вывод двумерного массива матрицей - VB
Формулировка задачи:
Доброго всем здравия! брятья помогите мне освоить вывод двумерного массива матрицей. буду примного благодарен!
Решение задачи: «Как освоить вывод двумерного массива матрицей»
textual
Листинг программы
Private Sub Command1_Click() Dim i As Integer, j As Integer, A() As Integer, m As Integer, n As Integer m = 10 ' Количество строк матрицы n = 10 ' Количество столбцов матрицы ReDim A(1 To m, 1 To n) ' Переобъявляем матрицу согласно новой размерности For i = 1 To m ' Пробегаем циклом по строкам For j = 1 To n ' И вложенным циклом по столбцам A(i, j) = (Rnd * 8 + 1) ' Заполняем массив случайными числами Print A(i, j); vbTab; ' Выводим на печать очередной элемент ' массива( VBTab - для красоты, ' точка с запятой - чтобы строка выводилась строкой, а не столбиком Next j Print ' Переход на следущую строку Next i End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д