按键精灵开发者一到六级认证最全总结答案

End Function

'四：1、切换所有标题包含\的窗口,请写出代码 Dim HwndEx, MyArray, i HwndEx = \

HwndEx = Plugin.Window.Search(\If HwndEx <> \

MyArray = Split(HwndEx, \

For i = 0 To UBound(MyArray) - 1 '模糊搜索最后一个值是空的所以忽略 Call Plugin.Window.Top(Clng(MyArray(i)), 0)

Call Plugin.Msg.Tips(\当前共有\& UBound(MyArray) & \个窗口包含“Internet Explorer”\切换为第\个窗口\ Delay 1500

Call Plugin.Window.Top(Clng(MyArray(i)), 1) Next Else

Call Plugin.Msg.Tips(\当前没有包含“Internet Explorer”的窗口\End If EndScript

'四：2、规定区域内随机输出一个日期,例如 \到\之间的某一天,请给出代码 Do

TracePrint \随机日期=\随机产生日期(\ Delay 1500 loop

EndScript

Function 随机产生日期(起始年月日, 终止年月日) Dim 间隔, 随机数

间隔 = DateDiff(\起始年月日, 终止年月日) 随机数 = Int((间隔 + 1) * Rnd)

随机产生日期 = DateAdd(\随机数, 起始年月日) End Function

'四：3、生成[2,6]个[65，90]之间的偶数,并将生成的数转为与指定的ANSI 字符代码相对应的字符,最终合并结果MessageBox 弹出。请给出代码。 Dim 字母个数 Do

Randomize

字母个数 = Int((6 - 3 + 1) * Rnd + 3)

MessageBox 随机偶数ANSI码(字母个数, 65, 90) Delay 500 loop

EndScript

Function 随机偶数ANSI码(字符数, 下限, 上限) Dim 随机数值, 字母Asc Randomize

For 字符数

随机数值 = int((上限 - 下限 + 1) * Rnd + 下限)

If 随机数值 mod 2 = 1 Then 随机数值 = 随机数值 - 1 If 随机数值 = 64 Then 随机数值 = 66 字母Asc = 字母Asc & Chr(随机数值) Next

随机偶数ANSI码 = 字母Asc End Function

'三：1、写出用goto命令循环十次的过程 Dim a1 a1 = 10

Rem 从这里开始

TracePrint \倒计次了！\a1 = a1 - 1

If a1 > 0 Then Goto 从这里开始 EndScript

'三：2、(前台)依次按下\四个键,中间延迟100毫秒,循环10次 Dim p

For p = 1 To 10 KeyPress 65, 1 Delay 100 KeyPress 74, 1 Delay 100 KeyPress 74, 1 Delay 100 KeyPress 76, 1 Delay 100 Next

EndScript

'三：3、有数字 a 和 数字 b ,分别弹出其 加减乘除 四个结果.(假设a=4,b=2),请给出代码 Dim a, b a = 4 : b = 2

MessageBox a + b MessageBox a - b MessageBox a * b MessageBox a / b

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 以下是2、3、4级部分选择题 较乱没有整理

按键精灵支持jpg 格式截屏 按键精灵可以调用VBS 8常数 VbOk 的值为? msgbox函数有以下返回值

常数 值 按钮 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 放弃 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否 11、UserVar Var1=DropList{\选项1\值1\选项2\值2\选项3\值3\选项4\值4\\设置内容\，问初始参数Var1=\值2\时，n是多少？

解释://格式: UserVar 变量=DropList{选项0:值0|选项1:值1|选项2:值2}=默认显示的选项编号 {注释}

这个命令预先设定多个变量值，用户可在基面通过下拉方式进行选择 ， 特别提醒：默认显示的选项编号从0开始。 14、以下命令可以获取当前窗口所在屏幕位置精确坐标的是？GetClientRect字符串型，客户区大小注 返回为：客户区窗口左角X坐标|客户区窗口左上角Y坐标|客户区窗口宽度|客户区窗口高度

15、假如a=\，b=\，c=\，d=\，以下返回值正确的是？

17、以下哪一个函数返回值数据类型与其他三个不一样?

18、关于自定义变量的描述以下哪一个是正确的?

19、Join命令的参数类型是? Join(list[，delimiter])

list 必选。包含要联接的子字符串一维数组。

delimiter 可选。在返回字符串中用于分隔子字符串的字符。如果省略，将使用空字符 (\。 如果 delimiter 是零长度字符串，则在同一列表中列出全部项，没有分界符。

20、选出返回值与其他三种不一样的选项。

21、True的值是?

TracePrint True -1 TracePrint False 0 TracePrint CBool(- 1 ) -1 TracePrint CBool(1) -1 TracePrint CBool(0) 0 TracePrint CBool(2) -1 TracePrint CBool(- 2 ) -1

true,false是bool布尔型.个人认为这两个是代表对立的两面,如汉字的真,假.你说真假是几? 实体书上说true输出值-1,false是0

22、下列语句中无法达到无限循环效果的是？

24、由RGB分量分别为(50,50,50)的颜色值得到的16进制颜色值为? Color = Plugin.Color.GetRGB(50, 50, 50) msgbox \得到16进制颜色值:\323232

3、Set 语句的含义是? D. 将对象引用赋给变量或属性 4、以下命令哪个不属于按键命令？ D. StopScript 6、以下无法获取句柄的命令是？b A. Foreground B. Active C. Search

D. MousePoint

9、False的值是? A. 0

14、返回已添加指定时间间隔的日期应使用下列哪一个函数?c A. DatePart 函数 返回给定日期的指定部分。 B. DateDiff 函数 返回两个日期之间的时间间隔 C. DateAdd 函数 返回已添加指定时间间隔的日期

D. Date 函数 返回表达式，此表达式已被转换为 Date 子类型的 Variant

7、以下哪1个返回值是字符串 b A len(\

b \ c \ d clng(\

20、以下无法获取句柄的命令是？ c

A. MousePoint 得到鼠标指向的窗口句柄返 回 值 整数型，窗口句柄

B. Search 遍历符合窗口标题的句柄保存到数值串里返 回 值 字符串型，句柄数值串 C. Active 激活窗口 返 回 值 无

D. Foreground得到当前最前面的窗口句柄返 回 值 整数型，窗口句柄

23.Text = Plugin.File.ReadINI(\

24、 以下哪一个命令的功能是设置屏幕分辨率? A. SetCLB 设置剪切板内容

B. GetScRY 获得屏幕分辨率高度

C. SetSc 命令功能 设置屏幕分辨率/颜色质量