一、在VB中聲明API函數有兩種方法:如果我們只在某個(gè)窗體中使用API函數,我們可以在窗體代碼的General部分聲明它:
聲明的語(yǔ)法是:
Private Declare Function ...
Private Declare Sub.....
這里必須采用Private聲明,因為這個(gè)API函數只能被一個(gè)窗體內的程序所調用。
如果我們的程序有多個(gè)窗體構成,而且我們需要在多個(gè)窗體中使用同一個(gè)API函數,就需要在模塊中聲明了。
先添加一個(gè)模塊(如圖示),
然后采用如下語(yǔ)法聲明:
Public Declare Function....
Public Declare Sub....
Public聲明的含義是把API函數作為一個(gè)公共函數或過(guò)程,在一個(gè)工程中的任何位置(包括所有的窗體和模塊)都能直接調用它。 聲明完畢我們就能在程序中使用此API函數了。
二、可采用以下幾種方式使用API函數,以SetWindowPos函數為例:
?。?)忽略函數返回值的調用:
SetWindowPos Form1.hWnd, -2 ,0 ,0 ,0, 0, 3
注意此時(shí)函數的參數是不加括號的。
?。?)Call方法調用:
Call SetWindowPos(Form1.hWnd, -2, 0, 0, 0, 3)
注意這里需要加上括號,但我們不取回函數的返回值。
?。?)取得函數返回值的調用:
MyLng = SetWindowPos(Form1.hWnd, -2, 0, 0, 0, 3)
此時(shí)需要加上括號,而且我們必須事先定義一個(gè)變量(變量的類(lèi)型與函數返回值類(lèi)型相同)來(lái)存儲API函數的返回值。
三、幾個(gè)問(wèn)題的說(shuō)明:
?。?)聲明中的Lib 和 Alias 是怎么回事
一般情況下WIN32API函數總是包含在WINDOWS系統自帶的或是其它公司提供的動(dòng)態(tài)連接庫DLL中,而Declare語(yǔ)句中的Lib關(guān)鍵字就用來(lái)指定DLL(動(dòng)態(tài)連接庫)文件的路徑,這樣VB才能找到這個(gè)DLL文件,然后才能使用其中的API函數。如果我們只是列出DLL文件名而不指出其完整的路徑的話(huà),VB會(huì )自動(dòng)到.EXE文件所在目錄、當前工作目錄、WINDOWS\SYSTEM目錄、WINDOWS目錄下搜尋這個(gè)DLL文件。所以如果所要使用DLL文件不在上述幾個(gè)目錄下的話(huà),我們應該指明其完整路徑。
Alias用于指定API函數的別名,如果我們調用的API函數要使用字符串(參數中包含String型)的話(huà),Alias關(guān)鍵字是必須的。這是因為在A(yíng)NSI和Unicode字符集中同一API函數的名稱(chēng)可能是不一樣的,為了保證不出現聲明錯誤,我們使用Alias關(guān)鍵字指出API函數的別名,一般來(lái)說(shuō)在WIN9X平臺下我們把API函數名后加一個(gè)大寫(xiě)A作為別名即可。
?。?)常見(jiàn)的API參數類(lèi)型的說(shuō)明
API函數的參數中最常見(jiàn)的是長(cháng)整Long型數據類(lèi)型,例如API中的句柄、一些特定的常量、函數的返回值都是此類(lèi)型 的值;另外幾種常見(jiàn)的參數類(lèi)型有:整型Integer、Byte型、String型等。
?。?)聲明中的ByVal是作什么用的
這跟VB的參數傳遞方式有關(guān),在默認情況下VB是通過(guò)地址傳遞方式傳遞函數的參數、而有些API函數要求必須采用傳值方式來(lái)傳遞函數參數(這兩種參數傳遞方式是不同的,前者傳遞的是一個(gè)指針,而后者要求是參數真實(shí)的值)。這樣就會(huì )發(fā)生錯誤,解決的辦法是在A(yíng)PI函數參數聲明的前面加上ByVal關(guān)鍵字,這樣VB就采用傳值方式傳遞參數了。
?。?)怎樣得到完整的API函數聲明
VB自帶了API文本查看器API TEXT VIEWER,我們可以在其中找到API函數的完整聲明,然后把它粘貼到程序中即可。