功能強大的API(應用程序接口)函數對於VB(VisualBasicForWindows)程序員來說,不愧是很好的編程工具,然而使用API函數的程序員也許都遇到這樣的現象。在VB集成環境下,程序運行後,出現一錯誤信息對話框,按確定鍵後系統自動退出VB集成環境,此時如果你的程序尚未存盤,那末很遺憾挽回損失已回天乏力。最後一次存盤之後的程序都不復存在。這是你對API函數使用不當引起的一般保護故障(GPF)。
當一個GPF錯發生時,你應允許Windows關閉你的應用。有些情況下你可能需要退出Windows或者重新引導系統。出錯程度視哪裡內存被破壞而定。DLL(動態鏈接庫)函數中的類型不一致等錯誤是GPF錯的主要原因。這些錯誤會導致GPF甚至使Windows系統完全崩潰(需要重新引導系統)。下面談避免GPF的一些技巧。
用別名來提供強類型檢查是避免GPF的有效措施之一。有些情況下,DLL函數可以接受多種類型,LoadCursor函數就是這樣一個例子,其定義如下:
HCURSORLoadCursor(hInstance,lpCursorName)
這裡HCURSOR是一個指向光標對象的16位句柄,hInstance是一個16位實例句柄,lpCursorName是光標的名字或者是光標資源的32位整數ID。為了支持兩種類型的lpCursorName參數。VB有必要包含如下兩個聲明:
DeclareFunctionLoadCursorLib"USER"(ByValhInstanceAsInteger,ByVallpCursorNameAsString)AsInteger和
DeclareFunctionLoadCursorLib"USER"(ByvalhInstanceAsInteger,ByVallpCursorNameAsLong)AsInteger
但是,這兩個聲明不能在一個程序中同時存在,因為VisualBasic會報重復聲明錯。我們知道,AsAny聲明可使得任何參數都可以傳遞給DLL函數,因此可以如下聲明:
DeclareFunctionLoadCursorLib"USER"(ByValhInstanceAsInteger,ByVallpCursorNameAsAny)AsInteger
上述聲明意味著VisualBasic能支持一個參數可接受多種類型的DLL函數,然而這就可能帶來各種災難性的後果,每當偶然情況下用不正確的參數調用該函數時,都可以引發一個GPF,我們可以這樣進行嚴格的類型檢查並且幫助防止這類問題。
這種方法就是在函數的聲明中使用Alias技巧,看看下面的兩個聲明:
DeclareFunctionLoadCursorByNamelib"USER"Alias"LoadCursor"(ByValhInstanceAsInteger,ByVallpCursorNameAsString)AsInteger和
DeclareFunctionLoadCursorByIDLib"USER"Alias"LoadCursor"(ByvalhInstanceAsInteger,ByVallpCursorNameAsLong)AsInteger
LoadCursorByName用字符串做lpCursorName參數訪問DLL函數LoadCursor,而LoadCursorByID訪問同樣的DLL函數LoadCursor,但是用長整型做lpCursorName參數,這兩個函數都對lpCursorName參數進行嚴格的類型檢查,使VisualBasic能在調用DLL函數之前識別出不正確的變量類型,最大限度地減少引起GPF或者導致系統崩潰的機會。
除此之外,使用API函數時運行之前最好先存盤,仔細檢查調用API函數的參數與聲明的類型是否一致,以及嚴格檢查參數是否有效都能減少引發GPF或者系統崩潰。->