产生并输出如下矩阵 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

产生并输出如下矩阵 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
产生并输出如下矩阵 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

产生并输出如下矩阵 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
很简单,一个数组就搞定
编辑窗体的单击事件
Private Sub Form_Click()
Dim a%(1 To 20)
For i = 1 To 20 Step 1
a(i) = i
Print a(i);
Next
End Sub
我试过了,没得问题,不懂得问我