VB中怎么给数组赋值

VB中怎么给数组赋值

问题补充说明：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