Question

vb高手,如何定义二维数组并且赋值?

先定义一个2行3列的数组
dim a(1 to 2,1 to 3)
再对数组初始化
a={{1,2,3},{4,5,6}}

我在visual basic 6.0上这样定义,但是有错误,请高手帮我看看

Answer 1

vb 中声明数组时如果定义了数组界限那么就不可以初始化赋值
你可以直接 dim a as Integer() ={{1,2,3},{4,5,6}}
初始化了数组并且也限定了数组的界限

Answer 2

在VB6中对数组初始化用循环语句
dim a(1 to 2,1 to 3) as integer

n=1
for i=1 to 2
for j=1 to 3
a(i, j)=n
n=n+1
next j
next i

追问

也许智能用这种傻办法了

追答

希望你找到智能办法让大家分享。

Answer 3

貌似只能
a(1,1)=1
a(1,2)=2
...........
如果有规律就用循环