包含界面的脚本.....................................................自己拖拽包，根据这里的控件名命名，然后自己拖拽
\'打开九阴真经
Event Form1.btn1.Click
Call RunApp("C:\Program Files (x86)\游戏蜗牛\9yinjh\fxlaunch.exe")
End Event
\'打开WPS
Event Form1.btn2.Click
Call RunApp("C:\Users\macbook\AppData\Local\Kingsoft\WPS Office\ksolaunch.exe")
End Event
\'打开QQ
Event Form1.btn4.Click
Call RunApp("C:\Program Files (x86)\Tencent\QQ\Bin\QQScLauncher.exe")
End Event
\'打开百度，默认加载页面
Event Form1.Load \'加载事件
Form1.WebBrowser1.Url = "www.baidu.com"
End Event
\'按钮实现打开百度首页
Event Form1.btn3.Click
Form1.WebBrowser1.Url = "www.baidu.com"
Form1.btn3.Caption = "百度一下"
Form1.WebBrowser1.HtmlClick "tag:A&txt:百度一下"
End Event
\'标签事件
Event Form1.Label1.Click
End Event
\'打开博客园
Event Form1.Button1.Click
\'外部打开
\'Call Plugin.Web.Bind("WQM.exe")
\'Call Plugin.Web.Go("https://www.cnblogs.com/ciscolee/")
\'使用内部打开
Form1.WebBrowser1.Url = "https://www.cnblogs.com/ciscolee/"
Form1.Button1.Caption = "博客园"
\'以下使用“网页按键精灵”网页分析功能查找元素特征串
Form1.WebBrowser1.HtmlClick "tag:A&txt:博客园"
End Event
\'结束打开博客园
Event Form1.WebBrowser1.DocumentComplete
\'网页加载完成，提示
Form1.Label1.Caption = "加载完成!!!!"
End Event
