VBA數(shù)組的聲明與引用

例如，要存儲(chǔ)一年中每天的支出，可以聲明一個(gè)具有365個(gè)元素的數(shù)組變量。數(shù)組中每個(gè)元素都有一個(gè)值。語句Dim curExpense(3 64)As Currency 聲明數(shù)組變量curExpense，共有365個(gè)元素。
     【注】：數(shù)組的下標(biāo)(序號(hào))默認(rèn)為從零開始。
     如果要引用數(shù)組中的元素，則必須指定元素的下標(biāo)。例如，語句
     Sub FiUArray()
     Dim curExpense(364)As Currency
     Dim intI As Integer
     For intI=0 tO 364
     curExpense(intI)=20
     Next
     End Sub
    給數(shù)組中的每個(gè)元素都賦予一個(gè)初始值20。
     數(shù)組的下標(biāo)也可以不從0開始，有兩種方法?？梢栽谀K的頂部使用Option Base語句，將第一個(gè)元素的默認(rèn)索引值從0改為其他值。例如，語句
     Option Base 1
     Dim curExpense(365)As Currency
    聲明的數(shù)組變量curExpense有365個(gè)元素，這是因?yàn)镺ption Base語句將數(shù)組下標(biāo)的起始值變成了1。也可以利用To子句來對(duì)數(shù)組下標(biāo)進(jìn)行顯式聲明。例如，語句
     Dim curExpense(1 To 865)As Currency
     Dim strWeekday(7 To 1 3)As String
    分別指定數(shù)組的下標(biāo)從1和7開始。