[求助]3*6维数组赋初值问题
比如说有一个3*6维的数组a(3,6)，初值为[1,2,3,4,5,6;15,26,34,28,79,46;10,6,52,21,3,4]，请问怎么把这些值赋给a(3,6)?谢谢！
以下是引用学习VB才2天在2006-11-27 15:54:17的发言：
DIM s() as string
dim strin as string
DIM a(3,6) as string
strin = 1,2,3,4,5,6;15,26,34,28,79,46;10,6,52,21,3,4
s() =split(strin,",")
for i = 0 to 3
for j = 0 to 6
a(i,j)=s(i+j)
next j
next i
DIM s() as string
dim strin as string
DIM a(3,6) as string
strin = 1,2,3,4,5,6;15,26,34,28,79,46;10,6,52,21,3,4
s() =split(strin,",")
for i = 0 to 3
for j = 0 to 6
a(i,j)=s(i+j)
next j
next i
谢谢！