在VB過(guò)程里使用常量的方法

當(dāng)你的程序運(yùn)行，變量的內(nèi)容是可以變化的，如果你想要一次又一次地引用不變的值，那么你應(yīng)該使用常量。常量就像一個(gè)指定的變量一樣，總是引用這個(gè)相同的值。VB要求你在使用前要聲明常量。正如下述例子，使用Const語(yǔ)句來(lái)聲明常量：

Const dialogName = "Enter Data" As String

Const slsTax = 8.5

Const ColorIdx = 3

常量，像變量一樣擁有范圍。要讓常量?jī)H在一個(gè)過(guò)程里可用，將它聲明為過(guò)程級(jí)別即可，例如：

Sub WedAnniv( )

        Const Age As Integer = 25

<place procedure instructions here>

End Sub

如果你想要某個(gè)常量在一個(gè)模塊的所有過(guò)程中都可用，則在Const語(yǔ)句前加上關(guān)鍵字Private就可以了

Private Const dsk = "B:" As String

私有常量必須在模塊的上面，第一個(gè)Sub語(yǔ)句之上聲明。如果你要?jiǎng)?chuàng)建一個(gè)該工作簿所有模塊都可用的常量時(shí)，在Const語(yǔ)句之前加上Public關(guān)鍵字就可以了，例如：

Public Const NumOfChar = 255 As Integer

公共常量必須在模塊的上面，第一個(gè)Sub語(yǔ)句之上聲明。聲明常量的時(shí)候，你可以使用下列數(shù)據(jù)類(lèi)型之一Boolean，Byte，Integer，Long，Currency，Single，Double，Date，String或者Variant。

像變量一樣，多個(gè)常量也可以在一行里聲明，例如：

Const Age As Integer = 25, City As String = "Denver", PayCheck As Currency = 350

使用常量可以使你的VBA過(guò)程可讀性強(qiáng)，容易維護(hù)。例如，你在程序里多次引用某個(gè)特定值，就可以使用常量，而不是這個(gè)值本身。這樣，如果以后這個(gè)值變了（例如銷(xiāo)售稅率上升了），你只要簡(jiǎn)單地在Const語(yǔ)句里改變這個(gè)常量的聲明就可以了，而不必追蹤該值所有發(fā)生的地方。

內(nèi)置常量

圖3－4 你可以在對(duì)象瀏覽器里面選擇常量名稱(chēng)然后在下面的窗口里看到它的實(shí)際值