方法一：鼠标事件

Setting.WebPackage("ReplayType") = 2    '根据鼠标事件回放

Browser("游戏运营管理平台_2").Page("游戏运营管理平台").WebElement("主菜单").Click 0,0,micLeftBtn  ‘0,0表示坐标

Browser("游戏运营管理平台").Page("游戏运营管理平台").Link("子菜单").Click

Setting.WebPackage("ReplayType") = 1   '根据键盘事件回放

方法二：FireEvent函数

Browser("游戏运营管理平台_2").Page("游戏运营管理平台").WebElement("主菜单").FireEvent "onclick"

Browser("游戏运营管理平台").Page("游戏运营管理平台_3").Link("子菜单").Click

Browser("name:=游戏运营管理平台").Dialog("text:=安全警报","regexpwndtitle:=安全警报").Activate

Set WshShell = CreateObject("WScript.Shell")

 WshShell.SendKeys "{UP}"

 WshShell.SendKeys "{enter}"

 wait 8

如果想全操作（既可以鼠标操作也可以用键盘操作）就先按住ctrl不松手，再按住alt也不松手，然后再松开ctrl，再松开alt

在SPY的时候按住Ctrl,就可以用鼠标操作