15
Январь
2011
Как заполнить матрицу в Visual Basic
Как заполнить матрицу в Visual Basic
Dim Matrix(1 To 4, 1 To 4) as Integer, i as Integer, j As integer
Dim D as Integer
For i=1 To 4
If I Mod 2 Then D=2 Else D=0
For j=1 To 4
Matrix(i,j)=D
Nexi j
Next i