问题: 如何使 Msgbox 在等待数秒后自动关闭? 解答: Msgbox 本身无此功能,但 Windows Script Host Model 提供了这样的信息框: 'Dim x As New IWshRuntimeLibrary.WshShell 'version: 5.6 Dim x As New IWshRuntimeLibrary.IWshShell_Class x.Popup "Please wait for 3 seconds!", 3, "Hello", 64 相关简体中文帮助文档下载: http://download.microsoft.com/download/winscript56/Install/5.6/W982KMe/CN/scd56chs.exe
具体可参照MSDN中相关章节.
好像说一定要按键以后程序才会继续运行
有其他的替代方案吗?
frmMsg.Label1 = username &"欢迎您!"
frmMsg.Caption = "欢迎信息"
frmMsg.show,,me
有啥麻烦的?
不是启动窗口
程序已经在运行了
现在想让弹出窗口以后程序可以继续运行。
解答: Msgbox 本身无此功能,但 Windows Script Host Model 提供了这样的信息框:
'Dim x As New IWshRuntimeLibrary.WshShell 'version: 5.6
Dim x As New IWshRuntimeLibrary.IWshShell_Class
x.Popup "Please wait for 3 seconds!", 3, "Hello", 64
相关简体中文帮助文档下载:
http://download.microsoft.com/download/winscript56/Install/5.6/W982KMe/CN/scd56chs.exe