标题: [求助]如何使WshShell.popup对话框最前端显示(已解决,谢谢!) [打印本页]

---

作者: ttytxz     时间: 2007-11-23 16:21    标题: [求助]如何使WshShell.popup对话框最前端显示(已解决,谢谢!)

大家好,请问如何使WshShell.popup对话框一直最前端显示?

例:
Set WshShell = CreateObject("WScript.Shell")
WshShell.popup "欢迎光临",5,"欢迎光临",48

谢谢!

[ Last edited by ttytxz on 2007-11-24 at 10:53 PM ]

---

作者: slore     时间: 2007-11-23 17:01
Set WshShell = CreateObject("WScript.Shell")
WshShell.popup "欢迎光临",5,"欢迎光临",48

其中5表示停留5秒……
你想一直存在设置为0，或者直接使用Msgbox

---

作者: ttytxz     时间: 2007-11-23 19:06
非常感谢slore的指点,我只想让它每次出现五秒,连续有很多句加在一起,中间用wscript.sleep 10000 延时,我发现在运行时第一个跳出的对话框会出现在前端,到了第二句开始的时候对话框就看不到了.

---

作者: jmz573515     时间: 2007-11-23 19:34
Set WshShell = CreateObject("WScript.Shell")
WshShell.popup "欢迎光临",5,"欢迎光临",4096
wscript.sleep 3000
WshShell.popup "欢迎光临",5,"欢迎光临",4096
wscript.sleep 3000
WshShell.popup "欢迎光临",5,"欢迎光临",4096
wscript.sleep 3000
WshShell.popup "欢迎光临",5,"欢迎光临",4096
这样试试

---

作者: ttytxz     时间: 2007-11-24 22:50
已经解决,非常感谢!