7. 常数 VbOk 的值为? 1
8. 以下语句无法返回时间信息的是？B. MyTime=Now(Time) 9. 下列哪一个函数可以取数组最大可用下标? Ubound
10. 以下对函数的描述哪一个是错误的? 函数一定有返回值 11. 以下命令哪个可以终止所有线程运行并停止脚本。ExitScript 12. ExitOS命令中，以下描述错误的是？可执行待机
13. 关于自定义变量的描述以下哪一个是错误的? 可以是数字或者字符串 错 数组？
14. 以下哪一个函数的功能是指明表达式的值是否为数字?IsNumeric 15、Set 语句的含义是? 将对象引用赋给变量或属性
16.选出下列命令参数格式错误的选项。PutAttachment \\？ 17.后台取色命令需要的参数为? 句柄和坐标
18. 以下命令可以获取当前窗口所在屏幕位置精确坐标的是？ Text = Plugin.Window.GetWindowRect(Hwnd)
19. 选出以下命令参数错误的。 Import \20.MsgBox命令最多可以使用几个参数? 5个
21. GetLastKey命令在获取一次ANSI字符代码后继续循环执行返回值是？ 0 22. 以下选项中不符合调用规则的是？Asc(F1)
23. 以下关于按键抓抓描述错误的是？支持后台找色找图效果测试 24.Media.Play命令不支持哪个文件格式。Mp4 25.数组MyArray(5)的最大可用下标为?Ubound 5 26.数组MyArray(5)包含的元素个数为?6
27.字符串\用Clng命令转换后除以2再用Cstr命令转换,最后结果为? ‘‘17’’
29.由RGB分量分别为(50,50,50)的颜；30.当str=\；31.RGB值分解为红绿蓝分量,分量值的范围是?；32.CallPlugin.Window.Clo；33.True的值是?-1；34.以下哪一个是类型转换函数?clng；35.使用WQM的脚本代码第一步应该做什么?绑定；36.以下对子程序和函数的描述哪一个是正
29.由RGB分量分别为(50,50,50)的颜色值得到的16进制颜色值为? 323232 30.当str = \，Eval(str)返回值为？3
31.RGB值分解为红绿蓝分量,分量值的范围是? 0-255
32.Call Plugin.Window.Close(参数)命令需要以下哪种参数？窗口句柄 33.True的值是? -1
34.以下哪一个是类型转换函数? clng
35.使用WQM的脚本代码第一步应该做什么? 绑定WQM
36.以下对子程序和函数的描述哪一个是正确的? 函数可以代替子程序 37.以下命令无法正常获取句柄的是？Active
38.myarray=Array(1,2,3,4,5),那么myarray(4)的值为? 5
39.如果有多个重复标题的窗口,以下哪个命令能够直接获取到所有对应窗口的 句柄?
HwndEx = Plugin.Window.Search(\记事本\
HwndEx = Plugin.Window.SearchEx(0,\记事本\
40.DateDiff命令有几个必选参数？且返回值类型是？3个 41.FindMutiColorEx命令有几个参数？8
42.myarray=Array(1,2,3,4,5),那么Ubound(myarray)的值为?4
43.Xor 运算符描述正确的是? ：用于对两个表达式进行逻辑异或运算。 44.GetLastKey：检测上次按键，返回数字，键码 45.Const 语句 ：定义常量
46. 以下哪一个命令不能用于调试内容输出?：beep
47.关于事件描述错误的是：事件子程序的参数可以是任意多个 48.以下哪个命令需要绑定WQM使用：Call Plugin.Web.ScrollTo(0,0) 49.常数vbok的值为：1
50.以下哪种情况可能导致获取不到网页元素：网页未完全加载 51.Join
命令的参数类型是?：数组
52.VarType 函数：返回指示变量子类型的值
53.下列对按键精灵变量描述正确的是?：不定义可以直接使用变量 54.以下哪个不是数学函数：ccur
55.以下哪个的值是true：not（false）
56. a=34,b=&H22,下列描述哪一个是错误的?：cstr（b）的值为“&H22” 57.vbcrlf--回车换行符
58. 以下哪一个命令可以得到变量的类型?：VarType 59. 关于延时命令描述错误的是?：可以停止脚本 60.str=Clng(Mid(\那么str的值为? 3 61. 以下哪个方法不能关闭窗体?：sWindow = Plugin.Window.IsWindow(Hwnd)
62.双引号的ANSI 字符代码是?：34
63.关于找图找色描述错误的是? 找图比找色更准确 错误：从思路上来说找图等同于找多点颜色 64.大型脚步中不推荐使用：goto命令 65.发送字符串：sendstring
66.以下对子程序的描述哪一个是正确的?：子程序没有返回值
67. 对于按键精灵与VBS的描述正确的是?：按键可以直接调用VBS命令 68. 132 Mod 13 的值为?:2 69.变量名称不合法：1MyArray 70.str=mid(\：\
71.哪个事件最先响应：onscriptload
72.以下哪一个命令的功能是设置屏幕分辨率?：setsc 73.QUI输入框控件返回值的变量类型是?：字符串 74.按键精灵的产品包括以下哪一个? ：按键盒子
75.哪一种方法能够找到命令的帮助说明?：在全部命令中搜索命令,点击后帮助说明会出现在编辑器下方.
76.关于加密脚本的描述，下列是错误的是?：只有会员输入密码可以解开加密脚本
77.鼠标所在位置为(50,50),经过命令 MoveTo 50,100 后鼠标所在位置为：50,100
78.WaitKey命令有几个参数?答案：0 79.vbCrLf的值为?A Chr(13) & Chr(10) 80.选出下列返回值类型不一样的选项。C A. InStr(str,str) B. Len(n)
C. Join(arr) D. Asc(n)
81.a = 10.05 Mod 2 ,那么a的值为? 0
82.Round(3.141592,5)返回值为什么？3.14159 83.Int(3\\2)返回值等于多少？ Int(3/2)
84.返回已添加指定时间间隔的日期应使用下列哪一个函数? DateAdd 函数 85.arr=Split(\\，问arr(5)等于多少？“6” 86.文本不存在,以下哪一个命令会新建立文本? C. WriteFileEx
87.下列语句中无法达到无限循环效果的是？C. For i = True To True : Next
6、以下命令无法改变窗口大小的是？ Call Plugin.Window.Move(Hwnd, 100, 100) 18、选出下列非键鼠操作的命令。
22、以下关于按键抓抓描述错误的是？
1、当n=3.141592*-1，以下语句返回值是绝对值的是？B. Abs(n) 4、以下哪一个变量不可能是数组? Const MyArray=2
5、假如a=\，b=\，c=\，d=\，以下返回值正确的是？IsNumeric(d) = True
6、arr=array(1,2,3,4,5,6,7,8,9)，问CStr(arr(5))等于多少？A \8、在脚本开头中加入代码 Msgbox Ture ,弹出的值为? 为空
9、QUI输入框控件返回值的变量类型是? 字符串
11、arr=array(0,1,2,3,4,5,6,7,8,9)，问Clng(arr(9))等于多少？B. 9 12、Round(3.141592,5)返回值为什么？3.14159
13、GetCursorShape(0)该命令返回值类型为？整数类型
17、执行Call Plugin.File.WriteINI(\\\内容\\命令后，IsFile = Plugin.File.IsFileExit(\返回值是？true
1、PrintScreen命令支持那种格式截图。D jpg 2、以下命令哪个不属于按键命令？StopScript
10、FindMutiColor命令的颜色特征点最少为几个？2个？ 3个错 20、以下哪一个命令会出错? TracePrint Cint(32768)
9、以下哪一个命令输出的值与其他三个不同? TracePrint fix(3.5)
Erase 语句的含义是? 重新初始化固定大小数组的元素，并释放动态数组的存储空间
5、以下命令无法正常获取句柄的是？B
错误！未找到引用源。 A. Hwnd = Plugin.Window.Search(\未命名 - 画图\错误！未找到引用源。 B. Hwnd = Plugin.Window.Find(\-1)
错误！未找到引用源。 C. Hwnd = Plugin.Window.Find(\\未命名 - 画图\
错误！未找到引用源。 D. Hwnd = Plugin.Window.Find(\\未命名 - 画图\7、关于自定义变量的描述以下哪一个是正确的? 自定义变量可以是数字或者字符串
A. 自定义变量可以是数组 D. 自定义变量可以是类
10、关于后台坐标的描述哪一个是不正确的? 后台坐标在窗体内是不会变化的
A. 后台坐标只针对窗体内生效
B. 后台坐标是由后台横坐标和后台纵坐标构成的
16、选出下列命令参数格式错误的选项。PutAttachment \17、Hex函数的返回值类型是? 字符串 21、以下哪一个命令可以定义常数? Const
23、以下不属于键鼠命令的是？Call Plugin.Bkgnd.SendString(Hwnd, 0) 前半部分为问答题 后半部分为选择题
问答题只需要复制单道题到按键精灵中后调试就会看到效果了 选择题是搜索的其他资料 并没有进行整理(紧供参考)
只有自己读懂每句代码的含义后再答题 这样不仅完成答题 还能丰富自己的知识
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
问答题部分
'六、1、写一个子程序,可以改变窗口内的某个子窗口的大小为特定值,子窗口大小随顶层窗口变化而比例变化(提示:改变顶层窗口,判断子窗口大小),请写出代码
Dim 父窗口句柄, 子窗口句柄, 客户区大小大小 Call RunApp(\Delay 1000
父窗口句柄 = Plugin.Window.Find(\0)
子窗口句柄 = Plugin.Window.FindEx(父窗口句柄, 0, \0) TracePrint \查找到的父窗口句柄为：\& 父窗口句柄 TracePrint \查找到的子窗口句柄为：\& 子窗口句柄 Call 比例大小(父窗口句柄, 子窗口句柄, 0.9) EndScript
Sub 比例大小(父窗口句柄, 子窗口句柄, 比例) Dim 父边框, 父左1, 父左2, 父右1, 父右2
父边框 = Plugin.Window.GetWindowRect(父窗口句柄)
父左1 = Clng(Split(父边框, \: 父左2 = Clng(Split(父边框, \父右1 = Clng(Split(父边框, \: 父右2 = Clng(Split(父边框, \Call Plugin.Window.Size(子窗口句柄, (父右1 - 父左1) * 比例, (父右2 - 父左2) * 比例) End Sub
'随机生N(N也为随机数)个字母,将N个字母分别赋值到数组中,数组的大小以最节省空间为标准生成.请写出代码
'六、1、随即输出10个50到100正整数，并从大到小排列(冒泡排序),请写出代码
Dim 随即Int(9), i1, j, Cache, bSwap Randomize
For i1 = 0 To 9
随即Int(i1) = Int((100 - 50 + 1) * Rnd + 50) TracePrint i1 & \：\& 随即Int(i1) Next
For j = 0 To UBound(随即Int) - 1 bSwap = False
For i1 = 0 To UBound(随即Int) - 1
If 随即Int(i1) < 随即Int(i1 + 1) Then '若是递增，则将 < 改为 > Cache = 随即Int(i1)
随即Int(i1) = 随即Int(i1 + 1) 随即Int(i1 + 1) = Cache bSwap = True End If Next
If bSwap = False Then Exit For Next
TracePrint \【冒泡排序后输出】\For i1 = 0 To UBound(随即Int) TracePrint i1 & \：\& 随即Int(i1) Next EndScript
'六、2、利用文本(TXT)模拟一个\数据库\数据库储存人物信息(编号|姓名|年龄|身高),需有对应的函数实现 查询/搜索/删除/增加 等功能(伪数据库),请写出代码
Dim 数据库路径, InputHome, Input查询, Input搜索, Input删除, Input增加, 查询结果, 搜索返回, 搜索结果, Show搜索, 删除结果
数据库路径 = \档案.txt\
InputHome = InputBox(\退出：Q 主页：H\& vbcrlf & vbcrlf & \查询：1 搜索：2 删除：3 增加：4\\主页·请输入对应字符进行相关操作\
Do While InputHome <> \And InputHome <> \If InputHome = \Or InputHome = \Then
InputHome = InputBox(\退出：Q 主页：H\& vbcrlf & vbcrlf & \查询：1 搜索：2 删除：3 增加：4\\主页·请输入对应字符进行相关操作\
ElseIf InputHome = \Then Do
查询结果 = \
Input查询 = InputBox(\退出：Q 主页：H\\查询·请输入编号进行查询\\编号\
If Input查询 = \Or Input查询 = \Then : InputHome = \: Exit Do ElseIf Input查询 = \Or Input查询 = \Then : InputHome = \: Exit Do ElseIf IsNumeric(Input查询) = True Then
查询结果 = 查询(数据库路径, Input查询) End If
If 查询结果 <> \Then MsgBox 查询结果, 65, \查询结果\Loop
ElseIf InputHome = \Then Do
搜索返回 = \: Show搜索 = \
Input搜索 = InputBox(\退出：Q 主页：H\& vbcrlf & vbcrlf & \可模糊搜索到编号、姓名、年龄、身高字段\\搜索·请输入关键字进行搜索\\关键字\
If Input搜索 = \Or Input搜索 = \Then : InputHome = \: Exit Do ElseIf Input搜索 = \Or Input搜索 = \Then : InputHome = \: Exit Do Else