按键精灵脚本制作教程：网页游戏规范浏览器大小

步骤我们要利用 'InternetExplorer.application'对象，来启动一个ie浏览器窗口，并且设置这个窗口的宽、高、位置等。 『1』    创建IE对象。『2』    设置IE浏览器窗口宽、高、位置等。『3』    打开要打开的网址『4』    判断网页是否加载完毕『5』    释放对象。

创建IE对象我们创建一个ie浏览器对象，命名为ie（对象名可根据个人喜好，ie也可，ei也可） ：Set ie=CreateObject('InternetExplorer.application')那么，我们在设置ie浏览器对象属性时，使用以下语法：ie.属性=值

设置当我们要对一个对象执行一系列语句的时候，为了减少一些代码，我们使用 with …… End with   语句。『语法』 With 对象名  属性=值  End With 我们前面建立的对象名是 ie

『代码』With ie    .Visible=True '设置对象为可视    .MenuBar=false '菜单栏不可见    .ToolBar=false'工具栏不可见    .StatusBar=false '状态栏不可见    .Width =1024 '浏览器宽    .Height=768  '浏览器高    .Left=0 'X坐标    .Top=0 'Y坐标    .FullScreen=0 '全屏    .Navigate 'http://www.anjian.com' '打开网址    .Resizable=false '设置IE对象大小是否可以被改动End With

『拓展』  with …… End with   语句  是当一个对象要执行一系列语句时，起减少代码作用的。  我们常用的大漠插件，大漠对象也是对象，所以这个语句也可以使用在大漠的例子中。『例如』Set dm = createobject('dm.dmsoft') With dm.moveto 200,200.leftclick End With

判断网页是否加载完毕判断网页是否加载完毕，我们需要用到 'InternetExplorer.application'对象里的busy属性Busy的意思是： 忙碌的、占线当网页还在加载过程中，Busy的值是Ture当网页加载完毕之后，Busy的值为False 『代码』While ie.busy    delay 200Wend 『分析』使用while……wend条件循环语句，当ie.busy这个条件为True的时候则进入循环体，延时200毫秒。直到ie.busy这个条件为False的时候退出循环。

释放对象当浏览器窗口设置完毕之后，不需要再对它进行设置的时候，我们要把前面创建的对象释放掉，减少系统资源占用。『代码』Set ie=Nothing '释放对象

整体代码Set ie=CreateObject('InternetExplorer.application') '首先建立IE对象With ie    .Visible=True '设置对象为可视    .MenuBar=false '菜单栏不可见      .ToolBar=false'工具栏不可见    .StatusBar=false '状态栏不可见    .Width =1024 '浏览器宽    .Height=768  '浏览器高    .Left=0 'X坐标      .Top=0 'Y坐标    .FullScreen=0 '    1：全屏   0：非全屏    .Navigate 'http://www.anjian.com' '打开网址    .Resizable=false '设置浏览器大小是否可以被改动  True：可以改动  False：不可以改动End WithWhile ie.busy    delay 200Wend//ie.Quit '关闭浏览器Set ie=Nothing '释放对象