Question

按键精灵 答题选项的问题

我想通过按键精灵的找字来完成自动答题 我在QQ窗口发送DCBA 四个字母 另一台电脑的QQ收到这条信息后 窗口1 答案选D 窗口2 答案选C 窗口3 答案选B 窗口4 答案选A 字母已经能识别出来了 目前遇到的问题是变量group怎样分开字母 脚本如下
Hwnd = Plugin.Window.Find("TXGuiFoundation", "QQ窗口名")
A="000000000000000000000011000000011000000011000000011000000001100000001100000001100000111100000000110000000110000000110111000111"
B="011111000001000110001000010001000011001000011001000010001111100001001100001000011001000011001000011001000011001000011011111100"
C="000011000001000010001000011011000000010000000110000000110000000110000000110000000010000000011000000011000000001000000000111100"
D="011110000011001100011000110011000011011000011011000011011000011011000011011000011011000011011000011011000110011000110011110000"
sRect = Plugin.Window.GetClientRect(Hwnd)
MyArray = Split(sRect, "|")
L = Clng(MyArray(0)) :T = Clng(MyArray(1))
R = Clng(MyArray(2)) : V = Clng(MyArray(3))
ox = L + 31
oy = T + 323
For 4
code=""
y2=oy
For 14
x2=ox
For 9
GetColor=GetPixelColor(x2,y2)
If GetColor = "00FF00" Then
i = "1"
Else
i="0"
End If
code=code&i
x2 = x2 + 1
Next
y2=y2+1
Next
If code = A Then
eng = "A"
ElseIf code = B
eng = "B"
ElseIf code = C
eng = "C"
ElseIf code = D
eng = "D"
Else
eng = "X"
End If
ox = ox + 12
group = group & eng
Next
MessageBox group

Answer 1

q=len(group)
for i=1 ti q
MessageBox mid(group,i,1)
next

Answer 2

用left 和right不就行了。