qileilove

          blog已經轉移至github,大家請訪問 http://qaseven.github.io/

          讓你的QTP在運行過程中“收入自如”

           我們在運行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

          posted on 2014-01-13 10:58 順其自然EVO 閱讀(270) 評論(0)  編輯  收藏 所屬分類: qtp

          <2014年1月>
          2930311234
          567891011
          12131415161718
          19202122232425
          2627282930311
          2345678

          導航

          統計

          常用鏈接

          留言簿(55)

          隨筆分類

          隨筆檔案

          文章分類

          文章檔案

          搜索

          最新評論

          閱讀排行榜

          評論排行榜

          主站蜘蛛池模板: 丰镇市| 龙泉市| 麻栗坡县| 泌阳县| 康平县| 沙雅县| 德保县| 大石桥市| 曲松县| 前郭尔| 长子县| 林口县| 孝义市| 崇明县| 沧州市| 教育| 黄大仙区| 安庆市| 汾西县| 朝阳区| 灵台县| 夏津县| 长汀县| 家居| 志丹县| 汨罗市| 皮山县| 老河口市| 连云港市| 东乡族自治县| 白城市| 长寿区| 收藏| 泰宁县| 台东县| 托克托县| 普格县| 叶城县| 赞皇县| 博客| 会泽县|