VBA数组的声明与引用

例如，要存储一年中每天的支出，可以声明一个包含365个元素的数组变量。数组中的每个元素都有一个值。语句Dim cure expense(3 64)As Currency声明数组变量cure expense，该变量有365个元素。

[注意]:数组的下标(序号)默认从零开始。
如果要引用数组中的元素，必须指定该元素的下标。例如，语句

Sub FiUArray()
Dim cure expense(364)As Currency
Dim intI As Integer
For intI = 0到364
cure expense(intI)= 20
Next
End Sub

数组中的每个元素的初始值都是20。

数组的下标也不能从0开始。有两种方法。您可以使用模块顶部的Option Base语句将第一个元素的默认索引值从0更改为另一个值。例如，语句
option base 1
dim cur expense(365)作为货币

声明的数组变量curExpense有365个元素，因为Option Base语句将数组下标的起始值更改为1。还可以使用To子句显式声明数组下标。例如，语句
dim cur expense(1到865)as currency
dimstr weekday(7到13) as string

指定数组下标分别从1和7开始。