VBS最大化IE浏览器

在自动化测试的过程中有时需要将web程序全屏显示，才能让有的自动化测试工具，顺利的识别到界面对象，以下是vbs利用浏览器对象的相关属性设置，将ie浏览器窗口全屏：

代码：

 

 

Sub MaxBrowserWindow(URL)
 With CreateObject("InternetExplorer.Application")
     .Navigate URL
     While .Busy
     wend
     .Left = 0
     .Top = 0
     .Width = .document.parentWindow.screen.availWidth
     .Height = .document.parentWindow.screen.availHeight
     .Visible = True
 End With
End Sub