·一周点击排行
·热点推荐
计算机二级ACCESS辅导:VBA数组的声明与引用
发布时间：2007-11-16 9:44:00 浏览次数: 852
例如，要存储一年中每天的支出，可以声明一个具有365个元素的数组变量。数组中每个元素都有一个值。语句Dim curExpense(3 64)As Currency 声明数组变量curExpense，共有365个元素。
【注】：数组的下标(序号)默认为从零开始。
如果要引用数组中的元素，则必须指定元素的下标。例如，语句
Sub FiUArray()
Dim curExpense(364)As Currency
Dim intI As Integer
For intI=0 tO 364
curExpense(intI)=20
Next
End Sub
给数组中的每个元素都赋予一个初始值20。
数组的下标也可以不从0开始，有两种方法。可以在模块的顶部使用Option Base语句，将第一个元素的默认索引值从0改为其他值。例如，语句
Option Base 1
Dim curExpense(365)As Currency
声明的数组变量curExpense有365个元素，这是因为Option Base语句将数组下标的起始值变成了1。也可以利用To子句来对数组下标进行显式声明。例如，语句
Dim curExpense(1 To 865)As Currency
Dim strWeekday(7 To 1 3)As String
分别指定数组的下标从1和7开始。
讨论此主题请进>>: 计算机二级ACCESS辅导:VBA数组的声明与引用