VB.NETWindowsAPI函数两步通

VB.NET经过长时间的发展，很多用户都很了解VB.NET Windows API函数了，这里我发表一下个人理解，和大家讨论讨论。VB.NET要实现查看文件中的图标，目前只使用.Net FrameWork SDK是无法实现这种功能的，正如前面所说，主要是由于.Net FrameWork SDK推出的时间较短，其功能还不可能面面俱到。

专业领域包括做网站、网站设计、商城网站建设、微信营销、系统平台开发，与其他网站设计及系统开发公司不同，成都创新互联的整合解决方案结合了帮做网络品牌建设经验和互联网整合营销的理念，并将策略和执行紧密结合，为客户提供全网互联网整合方案。

#T#解决问题的关键是正确使用Windows API函数，其中所涉及到的Windows API函数主要有二个：其一是获得指定文件中的图标数目；其二是从指定文件的指定位置导出图标的Windows句柄。这二个函数都位于 “Shell32.dll”文件中，并且函数的入口点都为“ExtractIcon”。下面是在VB.NET中分别使用DllImport特征类和“Declare”语句申明这二个VB.NET Windows API函数的具体方法。

1.使用DllImport特征类来申明VB.NET 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函数时，如果申明的函数名称和函数的入口点相同，则可以在申明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

下面就结合一个示例的编写过程来掌握的这二个Windows API函数的具体使用方法，这个示例的作用就是读取指定文件中的图标数目，并显示文件中的图标。

网站标题：VB.NETWindowsAPI函数两步通
分享地址：http://www.mswzjz.cn/qtweb/news43/264293.html

攀枝花网站建设、攀枝花网站运维推广公司-贝锐智能，是专注品牌与效果的网络营销公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：贝锐智能

贝锐智能技术为您推荐以下文章