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

    xiaoxiao2022-07-16  150

    我们在运行 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 最新内容请见作者的GitHub页:http://qaseven.github.io/ 相关资源:敏捷开发V1.0.pptx
    最新回复(0)