数组中设定上下界有什么方法？

声明数组时，在数组名之后跟一个用括号括起来的上界。

上界不得超过 Long数据类型的范围（-2,147,483,648 到 2,147,483,647）。

例如，下列数组声明可出现、在模块的声明段：

Dim Counters （14） As Integer '15 个元素。

Dim Sums （20） As Double '21 个元素。

为建立公用数组，直接用 Public 取代 Dim。

Public Counters （14） As Integer

Public Sums （20） As Double

在过程之中同样的声明使用 Dim：

Dim Counters （14） As Integer

Dim Sums （20） As Double

第一个声明建立了一个有 15 个元素的数组，其索引号从 0 到 14。

第二个声明建立了一个有 21 个元素的数组，其索引号从 0 到 20。缺省的下界为 0。

为了规定下界，用关键字 To 显式提供下界（为 Long数据类型）：

Dim Counters （1 To 15） As Integer

Dim Sums （100 To 120） As String

在前述声明中，Counters 的索引值范围从 1 到 15，而 Sums 的索引值范围从 100 到 120。