摘自MSDN: Dim 语句示例 该示例演示使用 Dim 语句来声明变量,也演示了用 Dim 语句来声明数组。数组的缺省下界为 0,可以在模块级使用 Option Base 语句来取代数组的缺省下界。'AnyValue 和 MyValue 按缺省情况被声明为 Variant, '同时值被设为 Empty。 Dim AnyValue, MyValue'显式声明一个 Integer 类型的变量。 Dim Number As Integer'在一行中声明多个变量。AnotherVar 为 Variant 类型, '因为它的类型被省略了。 Dim AnotherVar, Choice As Boolean, BirthDate As Date'DayArray 是一个有 51 个索引(从 0 到 50)元素的 Variant 数组, '假设在当前模块中 Option Base 被设为 0(缺省设置)。 Dim DayArray(50)'Matrix 是一个二维 Integer 数组。 Dim Matrix(3, 4) As Integer'MyMatrix 是一个显式指定了上下界 '的三维 double 数组。 Dim MyMatrix(1 To 5, 4 To 9, 3 To 5) As Double'BirthDay 是一个索引从 1 到 10 的 date 数组。 Dim BirthDay(1 To 10) As Date 'MyArray 是一个 variant 动态数组。 Dim MyArray()ReDim 语句 在过程级别中使用,用于为动态数组变量重新分配存储空间。 ReDim 语句用来定义或重定义原来已经用带空圆括号(没有维数下标)的 Private、Public 或 Dim 语句声明过的动态数组的大小。
第二句定义了一个动态数组,具体的数组元素需要ReDim语句再次定义.
Dim 语句示例
该示例演示使用 Dim 语句来声明变量,也演示了用 Dim 语句来声明数组。数组的缺省下界为 0,可以在模块级使用 Option Base 语句来取代数组的缺省下界。'AnyValue 和 MyValue 按缺省情况被声明为 Variant,
'同时值被设为 Empty。
Dim AnyValue, MyValue'显式声明一个 Integer 类型的变量。
Dim Number As Integer'在一行中声明多个变量。AnotherVar 为 Variant 类型,
'因为它的类型被省略了。
Dim AnotherVar, Choice As Boolean, BirthDate As Date'DayArray 是一个有 51 个索引(从 0 到 50)元素的 Variant 数组,
'假设在当前模块中 Option Base 被设为 0(缺省设置)。
Dim DayArray(50)'Matrix 是一个二维 Integer 数组。
Dim Matrix(3, 4) As Integer'MyMatrix 是一个显式指定了上下界
'的三维 double 数组。
Dim MyMatrix(1 To 5, 4 To 9, 3 To 5) As Double'BirthDay 是一个索引从 1 到 10 的 date 数组。
Dim BirthDay(1 To 10) As Date 'MyArray 是一个 variant 动态数组。
Dim MyArray()ReDim 语句
在过程级别中使用,用于为动态数组变量重新分配存储空间。
ReDim 语句用来定义或重定义原来已经用带空圆括号(没有维数下标)的 Private、Public 或 Dim 语句声明过的动态数组的大小。