常數
經常會發現代碼包含一些常數值,它們一次又一次地反復出現。還可發現,代碼要用到很難記住的數字,而那些數字沒有明確意義。
在這些情況下,可用常數大幅度地改進代碼的可讀性和可維護性。常數是有意義的名字,取代永遠不變的數值或字符串。盡管常數有點像變量,但不能像對變量那樣修改常數,也不能對常數賦以新值。常數有兩種來源:
1.內部的或系統定義的常數是應用程序和控件提供的。在“對象浏覽器”中的VisualBasic(VB)、和VisualBasicforapplications(VBA)對象庫中列舉了VisualBasic的常數。其它提供對象庫的應用程序,如MicrosoftExcel和MicrosoftProject,也提供了常數列表,這些常數可與應用程序的對象、方法和屬性一起使用。在每個ActiveX控件的對象庫中也定義了常數。關於使用“對象浏覽器”的詳細信息,請參閱第九章“用對象編程”。
2.符號的或用戶定義的常數是用Const語句來聲明的。下節“創建屬於自己的常數”中將說明用戶定義的常數。
在VisualBasic中,常數名采用大小寫混合的格式,其前綴表示定義常數的對象庫名。來自VisualBasic和VisualBasicforapplications對象庫的常數以"vb"開頭,例如vbTileHorizontal。
設計前綴時應盡力防止發生意外沖突,不能出現常數名稱相同但表示不同數值的情況。即使使用了前綴,兩個對象庫也仍可能包含表示不同值的相同常數。在這種情況下,引用哪個常數取決於哪個對象庫具有更高的優先級。關於改變對象庫優先級的信息,請參閱“引用對話框”部分。
為了絕對確保不發生常數名字沖突,可用以下語法來限定對常數的引用:
[libname.][modulename.]constname
Libname通常是控件或庫的類名。Modulename是定義常數的模塊的名字。Constname是常數名。在對象庫中定義了每個元素,並能在“對象浏覽器”中查看元素。
創建屬於自己的常數
聲明常數的語法是:
[Public|Private]Constconstantname[Astype]=expression
參數constantname是有效的符號名(其規則與建立變量名的規則一樣),expression由數值常數或字符串常數以及運算符組成;但在expression中不能使用函數調用。
Const語句可以表示數量、日期和時間:
ConstconPi=3.14159265358979
PublicConstconMaxPlanetsAsInteger=9
ConstconReleaseDate=#1/1/95#
也可用Const語句定義字符串常數:
PublicConstconVersion="07.10.A"
ConstconCodeName="Enigma"
如果用逗號進行分隔,則在一行中可放置多個常數聲明:
PublicConstconPi=3.14,conMaxPlanets=9,_
conWorldPop=6E 09
等號(=)右邊的表達式往往是數字或文字串,但也可以是其結果為數或字符串的表達式(盡管表達式不能包含函數調用)。甚至可用先前定義過的常數定義新常數。
ConstconPi2=conPi*2一旦已定義常數,就可將其放置在代碼中,使代碼更可讀。例如:
StaticSolarSystem(1ToconMaxPlanets)
IfnumPeople>conWorldPopThenExitSub
設定用戶自定義常數的范圍
和變量聲明一樣,Const語句也有范圍,也使用相同的規則:
為創建僅存在於過程中的常數,請在這個過程內部聲明常數。
為創建一常數,它對模塊中所有過程都有效,但對模塊之外任何代碼都無效,請在模塊的聲明段中聲明常數。
為創建在整個應用程序中有效的常數,請在標准模塊的聲明段中進行聲明,並在Const前面放置Public關鍵字。在窗體模塊或類模塊中不能聲明Public常數。
詳細信息關於范圍的更詳細信息,請參閱本章前面的“理解變量的范圍”一節.
避免循環引用
由於常數可以用其它常數定義,因此必須小心,在兩個以上常數之間不要出現循環或循環引用。當程序中有兩個以上的公用常數,而且每個公用常數都用另一個去定義時就會出現循環。例如:
'在Module1中:
PublicConstconA=conB*2 '在整個應用程序
'中有效。
'在Module2:
PublicConstconB=conA/2 '在整個應用程序
'中有效。
如果出現循環,在試圖運行此應用程序時,VisualBasic就會產生錯誤信息。不解決循環引用就不能運行程序。為避免出現循環,可將公共常數限制在單一模塊內,或最多只存在於少數幾個模塊內。
數據類型
變量是用來存儲值的所在處,它有名字和數據類型。變量的數據類型決定了如何將代表這些值的位存儲到計算機的內存中。在聲明變量時也可指定它的數據類型。所有變量都具有數據類型,以決定能夠存儲哪種數據。
根據缺省規定,如果在聲明中沒有說明數據類型,則令變量的數據類型為Variant。Variant數據類型很像一條變色龍,它可在不同場合代表不同數據類型。當指定變量為Variant變量時,不必在數據類型之間進行轉換,VisualBasic會自動完成各種必要的轉換。
但是,如果知道變量確實總是存儲特定類型的數據,並且還聲明了這種特定類型的變量,則VisualBasic會以更高的效率處理這個數據。例如,存儲人名的變量最好表示成String數據類型,因為名字總是由字符組成。
除變量外,數據類型也用於其它場合。在給屬性賦值時,這個值就有數據類型;函數的參數也有數據類型。事實上,在VisualBasic中,凡是與數據有關的東西就與數據類型有關。
你也可聲明任何基本類型的數組。
詳細信息關於更詳細信息,請參閱本章後面的“數組”部分。在第十五章“性能和兼容性的設計”中還將討論通過選擇數據類型來提高應用程序的性能。
聲明帶數據類型的變量
在使用非Variant變量之前,必須使用Private、Public、Dim或Static語句將變量聲明為Astype。例如,下列語句分別聲明了Integer、Double、String和Currency類型的變量:
PrivateIAsInteger
DimAmtAsDouble
StaticYourNameAsString
PublicBillsPaidAsCurrency
一個聲明語句可將多個聲明組合起來,請看下列語句:
PrivateIAsInteger,AmtAsDouble
PrivateYourNameAsString,BillsPaidAsCurrency
PrivateTest,Amount,JAsInteger
注意如果不提供數據類型,則指定變量為缺省類型。在上例中,變量Test和Amount是Variant數據類型。如果由於其它編程語言的經驗使你感到同一個聲明語句中的所有變量都有相同的指定數據類型(此例中為Integer),那麼,此處的結果可能會令人感到新鮮。
Numeric數據類型
VisualBasic支持幾種Numeric數據類型:Integer(整型)、Long(長整型)、Single(單精度浮點型)、Double(雙精度浮點型)和Currency(貨幣型)。與Variant類型相比,Numeric類型占用的存儲空間通常要少。
如果知道變量總是存放整數(如12)而不是帶小數點的數字(如3.57),就應當將它聲明為Integer類型或Long類型。整數的運算速度較快,而且比其它數據類型占據的內存要少。在For...Next循環內作為計數器變量使用時,整數類型尤為有用。
詳細信息關於控制結構的詳細資料,請參閱本章後面的“控制結構概述”。如果變量包含小數,則可將它們聲明為Single、Double或Currency變量。Currency數據類型支持小數點右面4位和小數點左面15位;它是一個精確的定點數據類型,適用於貨幣計算。浮點(Single和Double)數比Currency的有效范圍大得多,但有可能產生小的進位誤差。
注意浮點數值可表示為mmmEeee或mmmDeee,其中mmm是尾數,而eee是指數(以10為底的冪)。Single數據類型的最大正數值為3.402823E 38,或3.4乘以10的38次方;Double數據類型的最大正數值是1.79769313486232D 308或1.8乘以10的308次方。用D將數值文字中的尾數部分和指數部分隔開,就會導致將該值作為Double數據類型來處理。同樣,用這種方式使用E,也會導致將該值作為Single數據類型來處理。
Byte數據類型
如果變量包含二進制數,則將它聲明為Byte數據類型的數組(本章後面的“數組”中將討論數組)。在轉換格式期間用Byte變量存儲二進制數據就可保留數據。當String變量在ANSI和Unicode格式間進行轉換時,變量中的任何二進制數據都會遭到破壞。在下列任何一種情況下,VisualBasic都會自動在ANSI和Unicode之間進行轉換:
讀文件時
寫文件時
調用DLL時
調用對象的方法和屬性時
除一元減法外,所有可對整數進行操作的運算符均可操作Byte數據類型。因為Byte是從0-255的無符號類型,所以不能表示負數。因此,在進行一元減法運算時,VisualBasic首先將Byte轉換為符號整數。
所有數值變量都可相互賦值,也可對Variant類型變量賦值。在將浮點數賦予整數之前,VisualBasic要將浮點數的小數部分四捨五入,而不是將小數部分去掉。
詳細信息關於Unicode和ANSI轉換的詳細信息,請參閱第十六章“國際化”。
String數據類型
如果變量總是包含字符串而從不包含數值,就可將其聲明為String類型。
PrivateSAsString
然後可將字符串賦予這個變量,並用字符串函數對它進行操作。
S="Database"
S=Left(S,4)
按照缺省規定,String變量或參數是一個可變長度的字符串。隨著對字符串賦予新數據,它的長度可增可減。也可以聲明字符串具有固定長度。可用以下語法聲明一個定長字符串:
String*size
例如,為了聲明一個長度為50字符的字符串,可用下列語句:
DimEmpNameAsString*50
如果賦予字符串的字符少於50個,則用空格將EmpName的不足部分填滿。如果賦予字符串的長度太長,已不能成為定長字符串,則VisualBasic會直接截去超出部分的字符。
因為定長字符串用空格填充尾部多余的空間,所以在處理定長字符串時可發現,刪除空格的Trim和RTrim函數是很有用的。 可將標准模塊中的定長字符串聲明為Public或Private。在窗體和類模塊中,必須將定長字符串聲明為Private。
詳細信息請參閱《VisualBasic6.0語言參考手冊》中的“Ltrim、RTrim和Trim函數”。
交換字符串和數字
如果字符串表示數值,則可將字符串賦予數值變量。也可將數值賦予字符串變量。例如,將命令按鈕、文本框和列表框放置在窗體中。在命令按鈕的Click事件中輸入下列代碼。運行應用程序並單擊命令按鈕。
PrivateSubCommand1_Click()
DimintXAsInteger
DimstrYAsString
strY="100.23"
intX=strY '將字符串傳遞給數值變量。
List1.AddItemCos(strY) '將字符串中數值的余弦值。
'添加到列表框中。
strY=Cos(strY) '將余弦值傳遞給字符串變量。
Text1.Text=strY '在文本框中顯示字符串。
EndSub
VisualBasic會自動強制變量為適當的數據類型。在轉換字符串和數值時要小心;如果傳送字符串中的值不是數值,則在運行時會出錯。
Boolean數據類型
若變量的值只是“true/false”、“yes/no”、“on/off”信息,則可將它聲明為Boolean類型。Boolean的缺省值為False。在下面的例子中,blnRunning是Boolean變量,存儲簡單的yes/no設置。
DimblnRunningAsBoolean
'查看磁帶是否在轉。
IfRecorder.Direction=1Then
blnRunning=True
Endif
Date數據類型
Date和Time值既可包含在特定的Date數據類型中,又可包含在Variant變量中。一般的Date特性適用於這兩種類型。
詳細信息請參閱《聯機手冊》的“高級變量主題”中的“在Variant變量中存儲Date/Time值”部分。
當其它數值數據類型轉換為Date時,小數點左邊的值表示Date信息,小數點右邊的值則代表Time。午夜為0,正午為0.5。負數表示公元1899年12月31日之前的Date。