QTP中窗口最大化最小化控制

1、回访脚本的时候qtp自动最小化，脚本回放完毕后恢复
脚本前加上：
Dim objQTPWin
Set objQTPWin = GetObject("" , “QuickTest.Application”)
objQTPWin.WindowState = “Minimized”

脚本结束的位置加上：
objQTPWin.WindowState = “Restored”
Set objQTPWin = Nothing

2、控制web浏览器的窗口最大化最小化（百度网站为例）
浏览器全屏： Browser(“百度一下，你就知道”).FullScreen
浏览器最大、小化：
Browser(“百度一下，你就知道”).Page(“百度一下，你就知道”).Sync '若无此句会导致获取hwnd出现错误。
hwnd=Browser(“百度一下，你就知道”).Object.HWND
print hwnd
window(“hwnd:=”&hwnd).minimize
wait 2 '为了让效果更明显、故加等待时间
window(“hwnd:=”&hwnd).maximize

关于hwnd的介绍 http://baike.baidu.com/view/4287577.htm

hWnd含义编辑
h 是类型描述，表示句柄(handle)， Wnd 是变量对象描述，表示窗口，所以hWnd 表示窗口句柄
通俗地说，如果把一个到处跑的人当作指针的话，那么HWND就是该人的身份证----我想应该是身份证号码

hWnd 属性编辑
返回窗体或控件的句柄（注意 OLE 容器控件不支持该属性。句柄：是由操作环境定义的一个唯一的整数值，它被程序用来标识或者切换到对象，如窗体或控件等。）。
语法
object.hWnd
object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。