vb二维数组按行按列输出问题
PrivateSubCommand1_Click()Dimb(1To2,1To3)AsSingleDimiAsInteger,jAsIntegerFori=1To2For...
Private Sub Command1_Click()
Dim b(1 To 2, 1 To 3) As Single
Dim i As Integer, j As Integer
For i = 1 To 2
For j = 1 To 3
b(i, j) = InputBox("请输入数组元素的值")
Next j
Next i
Print "按行输出"
For i = 1 To 2
For j = 1 To 3
Print b(i, j),
Next j
Print
Next i
Print "按列输出"
For j = 1 To 3
For i = 1 To 2
Print b(i, j),
Next i
Print
Next j
End Sub
按行输出是第一行 然后走三列 然后第二行 再走3列
那样的话按列输出不就是第一列 走两行 再第二列 走两行 最后第三列 走两行
可是运行后按列输出变成2列3行的了 为什么? 展开
Dim b(1 To 2, 1 To 3) As Single
Dim i As Integer, j As Integer
For i = 1 To 2
For j = 1 To 3
b(i, j) = InputBox("请输入数组元素的值")
Next j
Next i
Print "按行输出"
For i = 1 To 2
For j = 1 To 3
Print b(i, j),
Next j
Next i
Print "按列输出"
For j = 1 To 3
For i = 1 To 2
Print b(i, j),
Next i
Next j
End Sub
按行输出是第一行 然后走三列 然后第二行 再走3列
那样的话按列输出不就是第一列 走两行 再第二列 走两行 最后第三列 走两行
可是运行后按列输出变成2列3行的了 为什么? 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询