VB.NET使用Alias子句簡介
學習VB.NET時,你可能會遇到VB.NET使用Alias子句問題,這里將介紹VB.NET使用Alias子句問題的解決方法,在這里拿出來和大家分享一下。
Declare語句中的Alias子句是一個可選的部分,用戶可以通過它所標識的別名對動態 庫中的函數進行引用。例如,在下面的語句中,聲明了一個在VB中名為MyFunction的函數,而它在動態庫Mydll.dll中最初的名字是MyFunctionX。
- Private Declare Function MyFunction Lib "Mydll.dll" _Alias "MyFunctionX" ( ) As Long
需要注意的是,Alias子句中的函數名是大小寫敏感的,也就是說,必須與函數在生成時的聲明(如在C源文件中的聲明)一致。這是因為32位動態庫與16位動態庫不同,其中的函數名是區分大小寫的。同樣道理,如果沒有VB.NET使用Alias子句,那么在 Function(或Sub)后的函數名也是區分大小寫的。
通常在以下幾種情況時需要VB.NET使用Alias子句:
1.處理使用字符串的系統Windows API過程
如果調用的系統Windows API過程要使用字符串,那么聲明語句中必須增加一個Alias 子句,以指定正確的字符集。包含字符串的系統Windows API函數實際有兩種格式:ANSI和Unicode(關于ANSI和Unicode兩種字符集的區別將在后面詳細闡述)。因此,在Windows頭文件中,每個包含字符串的函數都同時有ANSI版本和Unicode版本。例如,下面是SetWindowText函數的兩種C語言描述。可以看到,第一個描述將函數定義為SetWindowTextA,尾部的"A" 表明它是一個ANSI函數:
- WINUSERAPI BOOL WINAPI SetWindowTextA(HWND hWnd, LPCSTR lpString);
第二個描述將它定義為 SetWindowTextW, 尾部的"W" 表明它是一個 Unicode 函數:
- WINUSERAPI BOOL WINAPI SetWindowTextW(HWND hWnd, LPCWSTR lpString);
因為兩個函數實際的名稱都不是"SetWindowText",要引用正確的函數就必 須增加一個Alias子句:
- Private Declare Function SetWindowText Lib "user32" _
- Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal _
- lpString As String) As Long
應當注意,對于VB中使用的系統WindowsAPI函數,應該指定函數的ANSI版本,因為只 有WindowsNT才支持Unicode版本,而Windows95不支持這個版本。僅當應用程序只運行 在WindowsNT平臺上的時候才可以使用Unicode版本。
2.函數名是不標準的名稱
有時,個別的DLL過程的名稱不是有效的標識符。例如,它可能包含了非法的字符(如連字符),或者名稱是VB的關鍵字(如GetObject)。在這種情況下,可以使用Alias關鍵字。例如,操作環境DLLs中的某些過程名以下劃線開始。盡管在VB標識符中允許使用標識符,但是下劃線不能作為標識符的第一個字符。為了使用這種過程,必須先聲明一個名稱合法的過程,然后VB.NET使用Alias子句引用過程的真實名稱:
- Declare Function lopen Lib "kernel32" Alias "_lopen" _
- (ByVal lpPathName As String, ByVal iReadWrite _
- As Long) As Long
在上例中,lopen是VB中使用的過程名稱。而_lopen則是動態連接庫中可以識別的名 稱。
3.使用序號標識DLL過程
除了使用名稱之外,還可以使用序號來標識DLL過程。某些動態連接庫中不包含過程的名稱,在聲明它們包含的過程時必須使用序號。同使用名稱標識的DLL過程相比,如果使用序號,在最終的應用程序中消耗的內存將比較少,而且速度會快些。但是,一個具體的API的序號在不同的操作系統中可能是不同的。例如GetWindowsDirectory在Win95下的序號為432,而在WindowsNT4.0下為338。總而言之,如果希望應用程序能夠在不同的操作系統下運行,那么最好不要使用序號來標識API過程。如果過程不屬于API,或者應用程序使用的范圍很有限,那么使用序號還是有好處的。
要使用序號來聲明DLL過程,Alias子句中的字符串需要包含過程的序號,并在序號的 前面加一個數字標記字符(#)。例如,Windowskernel中的GetWindowsDirectory函數的序 號為432;可以用下面的語句來聲明該DLL過程:
- Declare Function GetWindowsDirectory Lib "kernel32" _
- Alias "#432" (ByVal lpBuffer As String, _
- ByVal nSize As Long) As Long
在這里,可以使用任意的合法名稱作為過程的名稱,VB將用序號在DLL中尋找過程。
為了得到要聲明的過程的序號,可以使用Dumpbin.exe等實用工具(Dumpbin.exe是Microsoft VisualC++提供的一個實用工具,它的使用說明可以參見VC的文檔)。利用Dumpbin,可以提取出.dll文件中的各種信息,例如DLL中的函數列表,它們的序號以及與代碼有關的其它信息。
【編輯推薦】