api函数在vb中的应用

《api函数在vb中的应用》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、API函数在VB中的应用API函数在VB中的应用所谓API就是“应用程序接口”（ApplicationProgramingInterface），是一些用C语言编写，由操作系统自身调用的函数。WindowsAPI函数由许多“动态链接库”或DLL组成。在32位Windows中，核心的WindowsAPIDLL有如下一些：gdi32.dll----图形显示界面的API。kernel32.dll----处理低级任务（比如内存和任务管理）的API。user32.d11----处理窗口和消息（VisualBasi

2、c程序员能把其中一些当作事件访问）的API。还不断有新的API出现，处理新的操作系统扩展，比如E-MAIL、联网和新的外设。由于WindowsAPI函数不是VisualBasic的内部函数，所以在使用它们之前必须显式地加以声明。要想得到正确格式化的函数声明，可以访问WINAPI目录下的文件WIN32API.TXT。本文只对Win95系统的API函数加以说明并调用Win95的内置功能。重新启动计算机的实现在Windows下安装过程序的用户可能都有这样的体会，当安装完某些应用程序后，安装程序会要求重新启动

3、计算机以使设置生效。那么，如果要用VB程序重新启动计算机该如何实现呢？其实利用ExitWindowsEx函数即可。程序的编写1．首先运行VB，然后新建一个工程（工程类型为标准EXE），然后双击Form1窗体，进入代码（Code）输入框，在其中输入：PrivateDeclareFunctionExitWindowsExLib"user32"(ByValuFlagsAsLong,ByValdwReservedAsLong)AsLong2．点击“工具箱”中的commandbutton（命令按钮）工具，即可在

4、窗体Form1中加入一个命令按钮，然后将该按钮属性中的Caption值定义为“重新启动”。完成之后双击该按钮，进入代码（code）输入框输入以下代码：PrivateSubCommand1_Click()ExitWindowsEx&H43,0EndSub程序的执行程序输入完成后，点击VB“运行”菜单中的“启动”或“全面编译”命令，然后点击“重新启动”按钮，即可重新启动计算机。磁盘格式化在Windows9X中，当用鼠标右键单击“我的电脑”中的“3.5软盘A”然后在出现的右键菜单中选择“格式化”选项，就将弹

5、出标准的“磁盘格式化”窗口。下面我们来看看如何在应用程序中利用函数轻松调用Windows95标准的“磁盘格式化”窗口，实现对磁盘相应的操作功能。程序的编写1．与上例相同，首先运行VB，新建一个标准工程，然后利用“工具箱”在Form1窗体中加入一个命令按钮对象，将该命令按钮属性中的Caption值定义为“软盘格式化”。完成之后双击该按钮，在代码输入框中输入以下代码：PrivateSubCommand1_Click()CallFormatFloppy'调用FormatFloppy过程EndSub2．然后用

6、鼠标右击窗体，选择右键菜单中的“添加/添加模块”选项，然后在出现的选择框中选择“模块”类型，接着在出现的模块代码输入框中加入以下代码：（注：模块是指一组声明的集合，其后为过程）'通用声明PublicConstWM_CLOSE=&H10DeclareFunctionFindWindowLib"user32"Alias"FindWindowA"(ByVallpClassNameAsAny,ByVallpWindowNameAsAny)AsLongDelareFunctionGetWindowsDirect

7、oryLib"kernel32"Alias"GetWindowsDirectoryA"(ByVallpBufferAsString,ByValnSizeAsLong)AsLongDeclareFunctionSetWindowPosLib"user32"(BvValhwndAsLongByValhWndInsertAfterAsLong,ByValXAslong,ByValyAsLong,ByValcxAsLong,ByValcyAsLong,ByValwFlagsAsLong)AsLongDecla

8、reFunctionGetDesktopWindowLib"user32"()AsLongDeclareFunctionLockWindowUpdateLib"user32"(ByValhwndLockAsLong)AsLongDeclareFunctionGetWindowRectLib"user32"(ByVayhwndAsLong,lpRectAsRECT)AsLongDeclareSubSleepLib"kernel32"(ByValdwMill