问题补充说明:For i = 1 To 3 For j = 1 To 3d(i, j) = Array(1, 2, 3, 1, 2, 3, 1, 2, 3) NextNext这样给二维数组赋值怎么老不对
Pri来自vateSubCommand1_Click()
Dimd
d=Ar360问答ray(Array(1,2,3),Array(4,5,6),Arra推洋间钱西y(7,8,9))
DimiAsInteger
DimjAsInteger
Fori=0To2
Forj=0To2
Printd(i)(j)
Nextj
Nexti
EndSub
标签:VB
版权声明:文章由 知识问问 整理收集,来源于互联网或者用户投稿,如有侵权,请联系我们,我们会立即处理。如转载请保留本文链接:https://www.zhshwenwen.com/answer/366170.html