让你的QTP在运行过程中“收入自如”

0 评论 加国无忧 51.CA 2014年1月23日 19:20 作者:Henry

我们在运行QTP批处理时,不需要把QTP的主界面显示出来,以免它阻碍了你的操作视线,那下面介绍二个函数方便你的QTP在运行过程中“收入自如”:

让QTP运行时保持最小化

Public Sub QTP_Small()
Dim objQTPWin
Set objQTPWin = GetObject("" , "QuickTest.Application")
objQTPWin.WindowState = "Minimized"
Set objQTPWin = Nothing

End Sub

恢复QTP窗口

Public Sub QTP_Big()
Dim objQTPWin
Set objQTPWin = GetObject("" , "QuickTest.Application")
objQTPWin.WindowState = "Restored"
Set objQTPWin = Nothing

End Sub

更多软件测试相关技术分享及资讯,请关注:http://www.newjob123.com/index.php/zh/it-tutoring/software-testing/qa-elite-class.html?channel=51cainfoarticle 致电咨询:416-644-1998



51官网微信 QR CODE
51官网微信
51官网微信 QR CODE
51口碑微信
分享
分享新闻到
微信朋友圈

扫描后点右上角分享

关键词阅读:

相关专题

0 评论 | 注册

网友评论