全面討論VB.NET申明Windows API函數
VB.NET還是比較常用的，于是我研究了一下VB.NET申明Windows API函數，在這里拿出來和大家分享一下，希望對大家有用。VB.NET查看文件中圖標的函數及VB.NET申明Windows API的方法：
VB.NET要實現查看文件中的圖標，目前只使用.Net FrameWork SDK是無法實現這種功能的，正如前面所說，主要是由于.Net FrameWork SDK推出的時間較短，其功能還不可能面面俱到。解決問題的關鍵是正確使用Windows API函數，其中所涉及到的Windows API函數主要有二個：其一是獲得指定文件中的圖標數目；其二是從指定文件的指定位置導出圖標的Windows句柄。這二個函數都位于 “Shell32.dll”文件中，并且函數的入口點都為“ExtractIcon”。下面是在VB.NET中分別使用DllImport特征類和“Declare”語句申明這二個Windows API函數的具體方法。
1.使用DllImport特征類來申明Windows API函數：
下面是在VB.NET中使用DllImport特征類申明二個Windows API函數的具體示例：
- '函數ExtractIcon，其功能是是從指定文件的指定位置導出圖標的Windows句柄。
- ＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" , EntryPoint := "ExtractIcon" ) ＞ _
Public Function _ ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As string ,
ByVal uiIconIndex As UInt32 ) As System.IntPtr- End Function
- '函數Icon_Num，其功能是獲得指定文件中的圖標數目
- ＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" , EntryPoint := "ExtractIcon" ) ＞ _
Public Function _ Icon_Num ( ByVal src As System.IntPtr , ByVal strFileName As string ,
ByVal uiIconIndex As Integer ) As Integer- End Function
在使用DllImport特征類申明Windows API函數時，如果申明的函數名稱和函數的入口點相同，則可以在VB.NET申明Windows API函數時，省略定義函數入口點對應的代碼，即EntryPoint對象字段對應的代碼，這樣聲明ExtractIcon函數的代碼也可以簡化為如下所示：
- ＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" ) ＞ _
Public Function _ ExtractIcon ( ByVal src As System.IntPtr ,
ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr- End Function
2.使用“Declare”語句來申明Windows API函數：
使用“Declare”語句的確比使用DllImport特征類要簡單了許多，下面是在VB.NET中使用“Declare”語句來聲明上述二個Windows API函數的具體方法：
- Declare Auto Function ExtractIcon Lib "Shell32.dll" Alias "ExtractIcon"
( ByVal src As System.IntPtr , ByVal strFileName As string ,
ByVal uiIconIndex As UInt32 ) As System.IntPtr- '聲明ExtractIcon函數
- Declare Auto Function Icon_Num Lib "Shell32.dll" Alias "ExtractIcon"
( ByVal src As System.IntPtr , ByVal strFileName As string ,
ByVal uiIconIndex As Integer ) As Integer- '聲明Icon_Num函數
在VB.NET申明Windows API函數時，“Declare”語句中Alias關鍵字的作用相當于使用DllImport特征類中的EntryPoint對象字段。同樣在使用 “Declare”語句聲明Windows API函數時，如果聲明的函數和函數的入口點相同，也可以省略Alias關鍵字對應的代碼，所以ExtractIcon函數也可以簡化為如下：
- Declare Auto Function ExtractIcon Lib "Shell32.dll" ( ByVal src As System.IntPtr ,
ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr
【編輯推薦】
