怎样ReDim 一个二维数组?

Question

在VB中,怎样ReDim 一个二维数组?

Answer 1

dim x()
private sub 过程()
  redim x(100,100)   '100是随你变动的
  redim  Preserve x(100,100) 'Preserve 是保存原有的数据
end sub

Answer 2

redim x(100,100)   '100是随你变动的
  redim  Preserve x(100,100) 'Preserve 是保存原有的数据
两者选一种即可

Answer 3

dim x( )as * '所需类型
private sub commend1_click()
    redim x(#,#)
.................
end sub试试如何？

Answer 4

ReDim 多维数组时，注意只能改变数组的最后一维，前面的维数是不能改变的

Answer 5

先定义一个数组再使用时就可以用redim来重新定义这个数组
就像上面的一样不过注意它的维数不可变的例:
dim ex(2,2) as int 
for i =1 to 2
 for j =1 to 2
  ex(i,j)=i*j
 next j
next i 
...
...使用完后想改的话
redim ex (3,3) as int '当然可以使用Preserve来使原来的数据继续使用
...
...                   '这些可以是你的新的代码

Answer 6

dim x()
private sub 过程()
  redim x(100,100)   '100是随你变动的
  redim  Preserve x(100,100) 'Preserve 是保存原有的数据
end sub

Answer 7

dim a(2,2) as stringPrivate Sub Command1_Click()
dim i as integermsgbox "go"redim a(10,10)
for i=0 to 10
  a(i,i)="*"
next
End Sub

Answer 8

redim 后加上preserve的话数组中原来的内容不会被清除