调用VBS实现弹信息框后关闭软件信息框还在

源码里附带有两个VBSmsgbox例子,msgbox是VB的信息框,
一个是是否钮信息框,选是后即弹出指定网址,
一个是普通的信息框,
源码都写有注释简单明了,

.版本 2 .支持库 shell .程序集 窗口程序集_启动窗口 .子程序 _按钮1_被单击 ' VBS文件可以写出桌面后,点击右键即可编辑 .如果 (文件是否存在 (取特定目录 (11) + “q.vbs”)) ' 判断vbs文件是否存在 执行 (#打开文件, 取特定目录 (11) + “q.vbs”, , , ) ' 存在就不用写出vbs文件了,直接执行 处理事件 () ' 防止软件假死 结束 () ' 结束软件 .否则 写到文件 (取特定目录 (11) + “q.vbs”, #这个是点是钮即打开指定网址的例子) ' 不存在就写出vbs文件,11是临时目录,放在临时目录就行了 执行 (#打开文件, 取特定目录 (11) + “q.vbs”, , , ) ' 执行vbs文件 处理事件 () ' 防止软件假死 结束 () ' 结束软件 .如果结束 .子程序 _按钮2_被单击 ' VBS文件可以写出桌面后,点击右键即可编辑 .如果 (文件是否存在 (取特定目录 (11) + “d.vbs”)) ' 判断vbs文件是否存在 执行 (#打开文件, 取特定目录 (11) + “d.vbs”, , , ) ' 存在就不用写出vbs文件了,直接执行 处理事件 () ' 防止软件假死 结束 () ' 结束软件 .否则 写到文件 (取特定目录 (11) + “d.vbs”, #这个是普通信息框的例子) ' 不存在就写出vbs文件,11是临时目录,放在临时目录就行了 执行 (#打开文件, 取特定目录 (11) + “d.vbs”, , , ) ' 执行vbs文件 处理事件 () ' 防止软件假死 结束 () ' 结束软件 .如果结束
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注