如何写一个4*4 的矩阵 例如
4 5 6 6
8 6 3 2
1 2 3 4
5 8 3 2
并输出这个矩阵
如果我想利用随机数产生一个4*4的矩阵
这些都该怎么办？
Private Sub Form_click()
Dim i%, j%, a%(4, 4)
For i = 1 To 4
For j = 1 To 4
a(i, j) = i * j
Print a(i, j)
Next j
Print
Next i
End Sub
我的是这样 可是输出结果却是
1
2
3
4

2
4
6
8

3
6
9
12

4
8
12
10

Private Sub Form_click()
Dim i%, j%, a%(4, 4)
For i = 1 To 4
For j = 1 To 4
a(i, j) = i * j
Print a(i, j)；
Next j
Print
Next i
End Sub


你忘了加分号了

为什么要加分号?print后面要加分号吗??

print后面加与不加分号有什么区别??

加了分号,,表示在同一行输出...
多看看书吧.

区别就在于，不加就输出你所形容格式，加了就输出你所需要的格式，哈哈

多看看VB基础的书吧

我知道了 谢谢

Private Sub Form_click()
Dim i%, j%, a%(4, 4)
randomize timer
For i = 1 To 4
For j = 1 To 4
a(i, j) = rnd*10
Print a(i, j);
Next j
Print
Next i
End Sub

随机产生数组