大家好,小訊來為大家解答以上的問題。api函數(shù)文本查看器，api函數(shù)這個很多人還不知道,現(xiàn)在讓我們一起來看看吧！

1、一、在VB中聲明API函數(shù)有兩種方法：如果我們只在某個窗體中使用API函數(shù)，我們可以在窗體代碼的General部分聲明它：聲明的語法是：Private?Declare?Function?...Private?Declare?Sub.....這里必須采用Private聲明，因為這個API函數(shù)只能被一個窗體內(nèi)的程序所調(diào)用。

2、如果我們的程序有多個窗體構成，而且我們需要在多個窗體中使用同一個API函數(shù)，就需要在模塊中聲明了。

3、先添加一個模塊（如圖示），然后采用如下語法聲明：Public?Declare?Function....Public?Declare?Sub....Public聲明的含義是把API函數(shù)作為一個公共函數(shù)或過程，在一個工程中的任何位置（包括所有的窗體和模塊）都能直接調(diào)用它。

4、?聲明完畢我們就能在程序中使用此API函數(shù)了。

5、二、可采用以下幾種方式使用API函數(shù)，以SetWindowPos函數(shù)為例：（1）忽略函數(shù)返回值的調(diào)用：SetWindowPos?***.hwnd,?-2?,0?,0?,0,?0,?3注意此時函數(shù)的參數(shù)是不加括號的。

6、（2）Call方法調(diào)用：Call?SetWindowPos(***.hwnd,?-2,?0,?0,?0,?3)注意這里需要加上括號，但我們不取回函數(shù)的返回值。

7、（3）取得函數(shù)返回值的調(diào)用：MyLng?=?SetWindowPos(***.hwnd,?-2,?0,?0,?0,?3)此時需要加上括號，而且我們必須事先定義一個變量（變量的類型與函數(shù)返回值類型相同）來存儲API函數(shù)的返回值。

8、三、幾個問題的說明：（1）聲明中的Lib?和?Alias?是怎么回事一般情況下WIN32API函數(shù)總是包含在Windows系統(tǒng)自帶的或是其它公司提供的動態(tài)連接庫DLL中，而Declare語句中的Lib關鍵字就用來指定DLL（動態(tài)連接庫）文件的路徑，這樣VB才能找到這個DLL文件，然后才能使用其中的API函數(shù)。

9、如果我們只是列出DLL文件名而不指出其完整的路徑的話，VB會自動到.EXE文件所在目錄、當前工作目錄、WINDOWSSYSTEM目錄、WINDOWS目錄下搜尋這個DLL文件。

10、所以如果所要使用DLL文件不在上述幾個目錄下的話，我們應該指明其完整路徑。

11、Alias用于指定API函數(shù)的別名，如果我們調(diào)用的API函數(shù)要使用字符串（參數(shù)中包含String型）的話，Alias關鍵字是必須的。

12、這是因為在ANSI和Unicode字符集中同一API函數(shù)的名稱可能是不一樣的，為了保證不出現(xiàn)聲明錯誤，我們使用Alias關鍵字指出API函數(shù)的別名，一般來說在WIN9X平臺下我們把API函數(shù)名后加一個大寫A作為別名即可。

13、（2）常見的API參數(shù)類型的說明API函數(shù)的參數(shù)中最常見的是長整Long型數(shù)據(jù)類型，例如API中的句柄、一些特定的常量、函數(shù)的返回值都是此類型?的值；另外幾種常見的參數(shù)類型有：整型Integer、Byte型、String型等。

14、（3）聲明中的ByVal是作什么用的這跟VB的參數(shù)傳遞方式有關，在默認情況下VB是通過地址傳遞方式傳遞函數(shù)的參數(shù)、而有些API函數(shù)要求必須采用傳值方式來傳遞函數(shù)參數(shù)（這兩種參數(shù)傳遞方式是不同的，前者傳遞的是一個指針，而后者要求是參數(shù)真實的值）。

15、這樣就會發(fā)生錯誤，解決的辦法是在API函數(shù)參數(shù)聲明的前面加上ByVal關鍵字，這樣VB就采用傳值方式傳遞參數(shù)了。

16、（4）怎樣得到完整的API函數(shù)聲明VB自帶了API文本查看器API?TEXT?VIEWER，我們可以在其中找到API函數(shù)的完整聲明，然后把它粘貼到程序中即可。

17、如下所示：Public Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long。

本文到此分享完畢，希望對大家有所幫助。