请教一个QTP实现问题

lbb520

想做一个能倒计时的MSGBOX

如:

            倒计时开始 离关闭此MSGBOX还有10秒
   
             确定                               取消


当秒数到0的时候,自动关闭此MSGBOX.并返回 一个值.


请问此方法如何实现.

xiaonan

晕,你是不是把QTP当成一个开发工具了,你这个还是用VB去实现吧,比较简单.

surlary

1. 
   
2. Dim res, WSH
   
3. Set WSH = CreateObject("WScript.Shell")
   
4. res = WSH.Popup("Closed after 10 secs.", 10, "Click OK")
   
5. MsgBox res
   
6. Set WSH = Nothing
   
7. 
   

复制代码

lbb520

surlary, 10这个数字能自动减1吗、

surlary

不能动态提示