不要追求绝对的公平,红尘之中没有公平而言,人活一世,难得糊涂。
it is no use doing what you like, you have got to like what you do.
SQAMsgbox 函数讲解
上一篇 /
下一篇 2007-02-05 16:02:56
/ 个人分类:Robot技术
功能说明:出现一个提示对话框,N秒后消失,比如说:提示等待一个窗口阿,有时候这个窗口没了,我也不知道
脚本运行到什么地方了,提示一下挺好,也方便
其他的
测试员修改,而且,也不影响无人值守的操作
51Testing软件测试网,\iEuF&H51Testing软件测试网9]~$F-oq%Si7H例子:SQAMsgbox "test","title",5
\.WC"UL X-x{0zp'@sY.E0Global iTime as Integer
51Testing软件测试网@B1M"q(OL$f1^4M$lEx&a6EQX)a
\g:T0Declare Function TimedDlgFunc(id As String, Action As Integer, Suppvalue As Long) As Integer
'tm)^?.N+Kbc\051Testing软件测试网
p/@ ?m2}#a{_Declare Function SQAMsgBox(sMsgText as String, Optional vMsgCaption as Variant, Optional vTimeOut as Variant) as Integer
51Testing软件测试网M
qm+Sg%k2` ?H^:vx
c0M#{a051Testing软件测试网%l.VZ,b!C|Function TimedDlgFunc(id As String, Action As Integer, Suppvalue As Long) As Integer
&S+HAQ9ul0 Static StartTime
3]:|;Wv.bSi0 Dim EndTime
7^ n b9W]9@`
eS0 Dim vTimeoutvalue as Variant
"_ l&O)O4_G4`0&E