- 注释:*********+m********
- 注释:后台操作脚本示范
- 定义变量 var(5)
- 注释:自定义一个数组变量var括号中的5为数组数量,数组变量是从0开始的;
- 令 var(0) = "字符输入测试1"
- 注释:数组变量var的第1个变量
- 令 var(1) = "字符输入测试2"
- 注释:数组变量var的第2个变量
- 令 var(2) = "字符输入测试3"
- 注释:数组变量var的第3个变量
- 令 var(3) = "字符输入测试4"
- 注释:数组变量var的第4个变量
- 令 var(4) = "字符输入测试5"
- 注释:数组变量var的第5个变量
- 令 var(5) = "字符输入测试6"
- 注释:数组变量var的第6个变量
- 令 ys = 1000
- 注释:自定义变量ys,变给变量ys斌值1000
- 启动程序或打开文件 "notepad.exe"
- 注释:运行记事本
- 延时 ys 毫秒
- 注释:延时单位为毫秒,此处的延时时间引用了变量ys的值,也就是1000
- 令 Hwnd = Window.Find(0,"无标题 - 记事本")
- 注释:获取窗口标题为“无标题-记事本”的句柄,并斌值给变量Hwnd
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Active(Hwnd)
- 注释:激活句柄为变量Hwnd的窗口
- msgbox("激活句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Max(Hwnd)
- 注释:最大化句柄为变量Hwnd的窗口
- MsgBox("最大化句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Min(Hwnd)
- 注释:最小化句柄为变量Hwnd的窗口
- MsgBox("最小化句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Restore(Hwnd)
- 注释:还原句柄为变量Hwnd的窗口
- MsgBox("还原句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Hide(Hwnd)
- 注释:隐藏句柄为变量Hwnd的窗口
- MsgBox("隐藏句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Show(Hwnd)
- 注释:显示句柄为变量Hwnd的窗口
- MsgBox("显示句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Move(Hwnd,100,100)
- 注释:移动句柄为变量Hwnd的窗口到桌面坐标100,100
- msgbox("移动句柄为变量Hwnd的窗口到桌面坐标100,100" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Size(Hwnd,400,300)
- 注释:把句柄为变量Hwnd的窗口大小高置为400*300
- MsgBox("把句柄为变量Hwnd的窗口大小高置为400*300" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Top(Hwnd,0)
- 注释:把句柄为变量Hwnd的窗口置于最顶层
- MsgBox("把句柄为变量Hwnd的窗口置于最顶层,此时其它窗口将不能覆盖句柄为变量Hwnd的窗口" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Top(Hwnd,1)
- 注释:取消把句柄为变量Hwnd的窗口置前
- MsgBox("取消把句柄为变量Hwnd的窗口置前" & chr(13) & "请按确定继续")
- 注释:弹出消息窗口,消息为后面引号中的内容
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 调用 Window.Min(Hwnd)
- 注释:最小化句柄为变量Hwnd的窗口
- MsgBox("此时窗口已最小化,等到弹出最大化窗口时可看到效果!" & chr(13) & "请按确定继续")
- 延时 ys 毫秒
- 注释:延时单位为毫秒
- 令 HwndEx = Window.FindEx(Hwnd,0,"Edit","")
- 注释:给变量HwndEx斌值句柄变量Hwnd窗口下的子窗口类名为"Edit"的子窗口句柄
- 注释:因为记事本接收字符串信息的是Edit子窗口,所以要获得这个窗口的句柄,才能实现后台输入字符串;
- 令 i = 0
- 注释:定义变量i,变给变量i斌值0
- 循环 6 次
- 注释:循环语句,For为关键字,后面的数字6为循环次数,需结合Next使用;
- 调用 Bkgnd.SendString(HwndEx,var(i))
- 注释:向句柄为变量HwndEx的窗口发送字符串var,这里的字符串可以是字符,也可以是变量;字符需用引号括起来例(Hwnd,"字符"),变量不需引号