快捷搜索: 王者荣耀 脱发

VB中的二维数组输出的定位

    二维数组的位置定位

代码:

Private Sub Command1_Click()

Dim a(1 To 9, 1 To 9) 先定义a的值范围

For i = 1 To 9

For j = 1 To 9

a(i, j) = "a" & "(" & i & "," & j & ")"

Print a(i, j); 这里的print后面有加“;“,所以是j值横着1~9输出

Next

Print ——————>因为这边的print是i循环当中,我们都知道没有任何

Next 情况下的话print语句都是竖着输出的,所以它就说

End Sub 明了竖着输出1~9,横着的保持第一个的数值,如图

所示。

    二维数组的注意事项

代码:

Private Sub Command1_Click()

Dim a(1 To 10, 1 To 10)

For i = 1 To 10

For j = 1 To 10

If j = 1 Or i = 1 Or i = 10 Or j = 10 Then

Print 1;

Else 这边一定要else,不然右边的1会缩进填补,如下图。

Print " "; 我们必须要用空格填补中间的空隙。

End If

Next

Print

Next

End Sub

经验分享 程序员 微信小程序 职场和发展