vb 矩阵的表示

来源：百度知道 编辑：UC知道 时间：2024/05/19 16:24:34
请问怎么才能输出一个随机矩阵（在picture1中显示）（4*4维）
用二维数组好像不行。
谢谢

用二维数组可以,参考程序如下：
Dim a(1 To 4, 1 To 4) As Integer '声明一个4*4的二维数组
Dim i As Integer, j As Integer
For i = 1 To 4
For j = 1 To 4
Randomize '初始化随机数的种子，保证每次产生的随机数都不同
a(i, j) = Int(Rnd * 10) '假设产生[0,10)区间的整数随机数
Picture1.Print a(i, j); '在picture内输出
Next j
Picture1.Print '用来实现换行
Next i

你试试看！

二维数组可以解决，我以前做过，你好的代码给我我给你改