1、启动VB6
2、进入菜单:外接程序--外接程序管理器
单击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相同
正文
本文地址:http://com.8s8s.com/it/it42855.htm