1、启动VB62、进入菜单：外接程序--外接程序管理器      单击VB6 API Viewer      勾选“在启动中加载”和“加载/卸载”      按“确定”3、进入菜单：外接程序--API 浏览器      进入API浏览器的菜单：文件--加载文本文件      选择：WIN32API.TXT      进入API浏览器的菜单：文件--转换文本为数据库      保存数据库名为WIN32API.MDB      进入API浏览器的菜单：文件--加载数据库文件      选择：WIN32API.MDB      勾选API浏览器的菜单：视图--加载最后文件      在API类型为“声明”的情况下，“键入你要查找的内容的开头几个字母”下面输入：“winexec“,下面就出现了WinExec这个函数      选择“声明范围”为“私有”      双击“可用项”中出现的WinExec函数      “选定项”中就出现了下面的代码：      Private Declare Function WinExec Lib "kernel32" Alias "WinExec" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long      按“插入”就将这个API函数声明入到了你当前的窗体的“通用”模块中。 4、接下来，你可以在窗体中调用这个API函数了，比如：      WinExec "Explorer http://www.zjnu.edu.cn", SW_SHOWMAXIMIZED      这里，SW_SHOWMAXIMIZED是API的一个预定义的常数，你可以在API浏览器中的API类型为“常数”类型中输入   SW_SHOWMAXIMIZED可以发出它实际上的定义为：Private Const SW_SHOWMINIMIZED = 2，你也可以利用这个预定的值直接写到API函数中：WinExec "Explorer http://www.zjnu.edu.cn", 2也是一个道理。但这里,需要在窗体的通用模块中定义这个常量:Private Const SW_SHOWMAXIMIZED = 3这种常量的声明,还是需要在AIP浏览器中生成。方法是：在API浏览器的“API类型”中选择“常数”，在“声明范围”中选择“私有”，在，“键入你要查找的内容的开头几个字母”下面输入“sw_showmaximized”这个常量，在“可用项”中就会出现它，双击这个找到的常量名，按“插入”按钮就把这行定义代码写到窗体的通用模块里去了。 参数nCmdShow 的取值有：uCmdShow：定义了以怎样的形式启动程序的常数值，它与ShowWindow函数的 nCmdShow 参数总结的设置相同： uCmdShow Long，为窗口指定可视性方面的一个命令。请用下述任何一个常数 SW_HIDE 隐藏窗口，活动状态给令一个窗口 SW_MINIMIZE 最小化窗口，活动状态给令一个窗口 SW_RESTORE 用原来的大小和位置显示一个窗口，同时令其进入活动状态 SW_SHOW 用当前的大小和位置显示一个窗口，同时令其进入活动状态 SW_SHOWMAXIMIZED 最大化窗口，并将其激活 SW_SHOWMINIMIZED 最小化窗口，并将其激活 SW_SHOWMINNOACTIVE 最小化一个窗口，同时不改变活动窗口 SW_SHOWNA 用当前的大小和位置显示一个窗口，不改变活动窗口 SW_SHOWNOACTIVATE 用最近的大小和位置显示一个窗口，同时不改变活动窗口 SW_SHOWNORMAL 与SW_RESTORE相同

评论