Visual Basic设计图标提取工具_VB.NET程序_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

Visual Basic设计图标提取工具

作者：闵涛文章来源：闵涛的学习笔记点击数：806 更新时间：2009/4/23 15:02:25

　　在一些可执行模块包括*.EXE（可执行文件），*.DLL（Dynamic Link Library, 即动态连接库），*.CPL（控制面板模块）等都含有图标。其中，不少图标做得非常漂亮，如何将其“据为己有”？你一定用过诸如“东日探囊”之类的查看图标的小东东，但是有没有想过自己编写一个类似的小程序，我们知道：包含在可执行模块中的图标资源是以二进制数据（也叫资源，不懂的查书去）的形式存储，我们需要把二进制数据转换成图标文件的格式，然后再存为图标文件（*.ICO）。

　　打开VB，新建一窗体，其caption值为“图标提取工具”，添加部件Microsoft Common Dialog Control6.0，并在窗体上放置两个common dialog，分别命名为：dlgsave和dlgopen，用于制作保存和打开的通用对话框。放置一个textbox，命名为textbox，用于显示选择文件后的文件路径及文件名，再放置两个命令按钮，caption值分别为：“打开文件”、“取消”，放置一个picturebox，命名为Iconbox，用于显示提取出来的图标，在picturebox下方放置一个hscrollbar，用于多个图标的选择，界面排列如图（图1）准备工作做完后，开始代码的编写。

　　在工程中新建一模块，进行API声明：

Option Explicit
Declare Function ExtractIcon& Lib "shell32.dll" Alias "ExtractIconA" (ByVal hInst As Long, ByVal lpszExeFileName As String, ByVal nIconIndex As Long)
Declare Function DrawIcon& Lib "user32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal hIcon As Long)
　　ExtractIcon用于判断一个可执行文件或DLL中是否有图标存在，并将其提取出来，返回值为Long，如成功，返回指向图标的句柄；如文件中不存在图标，则返回零。如果nIconIndex设为-1，就返回文件中的图标总数；DrawIcon函数则在指定的位置画一个图标。

[系统软件]Visual Studio 2005 Express Beta Products 下载链…  [系统软件]Visual FoxPro9.0中扩展报表系统功能
[系统软件]Visual FoxPro：我是旁观者  [系统软件]Visual Studio 2005 Express Editions Beta 2 下载…
[系统软件]Boost库在XP+Visual C++.net中的安装  [系统软件]Visual Studio 2005 Express Edition 正式版下载地…
[常用软件]Visual Foxpro通用报表打印程序  [常用软件]Visual FoxPro 6.0与大型数据库的无数据源连接
[常用软件]Visual Foxpro 的一个BUG  [VB.NET程序]Visual Basic 6 逆向工程与反逆向工程 (2)

教程录入：mintao 责任编辑：mintao

上一篇教程： Visual Basic通用报表设计小结

下一篇教程： VB.NET数据库工具教程之一

【字体：小大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网]

　网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

同类栏目

· C语言系列 · VB.NET程序
· JAVA开发 · Delphi程序
· 脚本语言

热门推荐

没有教程

赞助链接

闵涛博文

500 - 内部服务器错误。

您查找的资源存在问题，因而无法显示。

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18

闵涛站盟:医药大全-武穴网。A打造B、C、D……