經常會發(fā)現代碼包含一些常數值,它們一次又一次地反復出現。還可發(fā)現,代碼要用到很難記住的數字— 而那些數字沒有明確意義。
在這些情況下,可用常數大幅度地改進代碼的可讀性和可維護性。常數是有意義的名字,取代永遠不變的數值或字符串。盡管常數有點象變量,但不能象對變量那樣修改常數,也不能對常數賦以新值。常數有兩種來源:
內部的或系統定義的常數是應用程序和控件提供的。在“對象瀏覽器”中的 visual basic ( vb ) 、和 visual basic for applications ( vba ) 對象庫中列舉了 visual basic 的常數。其它提供對象庫的應用程序,如 microsoft excel 和 microsoft project,也提供了常數列表,這些常數可與應用程序的對象、方法和屬性一起使用。在每個 activex 控件的對象庫中也定義了常數 關于使用“對象瀏覽器”的詳細信息,請參閱“用對象編程”。
符號的或用戶定義的常數是用 const 語句來聲明的。下節(jié)“創(chuàng)建屬于自己的常數”中將說明用戶定義的常數。
在 visual basic 中,常數名采用大小寫混合的格式,其前綴表示定義常數的對象庫名。來自 visual basic 和 visual basic for applications 對象庫的常數以 “vb” 開頭— 例如vbtilehorizontal。
設計前綴時應盡力防止發(fā)生意外沖突,不能出現常數名稱相同但表示不同數值的情況。即使使用了前綴,兩個對象庫也仍可能包含表示不同值的相同常數。在這種情況下,引用哪個常數取決于哪個對象庫具有更高的優(yōu)先級。關于改變對象庫優(yōu)先級的信息,請參閱 “引用對話框”部分。
為了絕對確保不發(fā)生常數名字沖突,可用以下語法來限定對常數的引用:
[libname.][modulename.]constname
libname 通常是控件或庫的類名。modulename 是定義常數的模塊的名字。constname 是常數名。在對象庫中定義了每個元素,并能在“對象瀏覽器”中查看元素。
創(chuàng)建屬于自己的常數
聲明常數的語法是:
[public|private] const constantname[as type] = expression
參數 constantname 是有效的符號名(其規(guī)則與建立變量名的規(guī)則一樣),expression 由數值常數或字符串常數以及運算符組成;但在 expression 中不能使用函數調用。
const 語句可以表示數量或 date / time 量:
const conpi = 3.14159265358979
public const conmaxplanets as integer = 9
const conreleasedate = #1/1/95#
也可用 const 語句定義字符串常數:
public const conversion = “07.10.a”
const concodename = “enigma”
如果用逗號進行分隔,則在一行中可放置多個常數聲明:
public const conpi = 3.14, conmaxplanets = 9, _
conworldpop = 6e+09
等號 ( = ) 右邊的表達式往往是數字或文字串,但也可以是其結果為數或字符串的表達式(盡管表達式不能包含函數調用)。甚至可用先前定義過的常數定義新常數。
const conpi2 = conpi * 2
一旦已定義常數,就可將其放置在代碼中,使代碼更可讀。例如:
static solarsystem (1 to conmaxplanets)
if numpeople > conworldpop then exit sub
設定用戶自定義常數的范圍
和變量聲明一樣, const 語句也有范圍,也使用相同的規(guī)則:
為創(chuàng)建僅存在于過程中的常數,請在這個過程內部聲明常數。
為創(chuàng)建一常數,它對模塊中所有過程都有效,但對模塊之外任何代碼都無效,請在模塊的聲明段中聲明常數。
為創(chuàng)建在整個應用程序中有效的常數,請在標準模塊的聲明段中進行聲明,并在 const 前面放置 public 關鍵字。在窗體模塊或類模塊中不能聲明 public 常數。
詳細信息 關于范圍的更詳細信息,請參閱本章前面的“理解變量的范圍”一節(jié)。
避免循環(huán)引用
由于常數可以用其它常數定義,因此必須小心,在兩個以上常數之間不要出現循環(huán)或循環(huán)引用。當程序中有兩個以上的公用常數,而且每個公用常數都用另一個去定義時就會出現循環(huán)。
例如:
‘在 module1 中:
public const cona = conb * 2 ’在整個應用程序
‘中有效。
’在 module 2:
public const conb = cona / 2 ‘在整個應用程序
’中有效。
如果出現循環(huán),在試圖運行此應用程序時,visual basic 就會產生錯誤信息。不解決循環(huán)引用就不能運行程序。為避免出現循環(huán),可將公共常數限制在單一模塊內,或最多只存在于少數幾個模塊內。