求助 怎么用循环语句 实现第一行数组+第二行数组+第三行数组 显示为000。001.。。。999
我刚开始学习 vb6 请老鸟们赐教0 1 2 3 4 5 6 7 8 9
0 1 2 3 4 5 6 7 8 9
0 1 2 3 4 5 6 7 8 9
用第一行每一个数字分别加第二行每个数字再加第三行每个数字 不是加法运算
显示为000 001 002 003 。。。。。。。。999
先在这里 谢谢了！
Dim r(3, 10) As Integer
Private Sub Form_Click()
For i = 0 To 3
For j = 0 To 9
r(i, j) = j
Print r(i, j);
Next
Print
Next
Print vbclf
For O = 0 To 9
For p = 0 To 9
For q = 0 To 9
Print Spc(2); (O & p & q);
Next
Print
Next
Print
Next
End Sub
Private Sub Form_Click()
For i = 0 To 3
For j = 0 To 9
r(i, j) = j
Print r(i, j);
Next
Next
Print vbclf
For O = 0 To 9
For p = 0 To 9
For q = 0 To 9
Print Spc(2); (O & p & q);
Next
Next
Next
End Sub
程序代码：