vb中的数组怎么用

Question

dim a() as longa(0)=8
不行啊,给个例子
我的数组长度是根据动态得到的
dim a(num) as long 
也不行啊

Answer 1

dim a() as long
就是这样子的！

Answer 2

dim a(8) as long      '表示有8个数的数组
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝dim a() as long
redim a(8)               ‘动态定义数组长度

Answer 3

dim a() as long
redim a(num) as long 
a(0)=8

Answer 4

动态定义数组：
  dim a() as long  '先声明一个没有下标的数组
  redim a(num) as long   ‘向a()中定义下标个数num

Answer 5

每次执行 ReDim 语句时，当前存储在数组中的值都会全部丢失有时希望改变数组大小又不丢失数组中的数据。使用具有 Preserve 关键字的 ReDim 语句就可做到这点。例如，使用 UBound 函数引用上界，使数组扩大、增加一个元素，而现有元素的值并未丢失：ReDim Preserve DynArray (UBound (DynArray) + 1)在用 Preserve 关键字时，只能改变多维数组中最后一维的上界；如果改变了其它维或最后一维的下界，那么运行时就会出错

Answer 6

dim a(n) as long        'n为整数的长整型一维数组 
dim a(n，m) as long        'n，m为整数的长整型二维数组