51Testing软件测试论坛

标题: 请教一个QTP实现问题 [打印本页]

作者: lbb520    时间: 2007-7-27 14:32
标题: 请教一个QTP实现问题
想做一个能倒计时的MSGBOX

如:

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


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


请问此方法如何实现.
作者: xiaonan    时间: 2007-7-27 14:58
晕,你是不是把QTP当成一个开发工具了,你这个还是用VB去实现吧,比较简单.
作者: surlary    时间: 2007-7-27 15:02

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

复制代码

作者: lbb520    时间: 2007-7-27 15:15
surlary, 10这个数字能自动减1吗、
作者: surlary    时间: 2007-7-27 15:20
不能动态提示




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2