Question

按键精灵的一条命令不知道怎么设置了 ~求大牛解答

If Form1.CheckBox23.Value = 1 Then
Set voice = createobject("SAPI.SpVoice")
voice.Speak "Let's Start"
End If
If Form1.CheckBox22.Value = 1 Then
strSoundFile = "C:\go.wav"
VBS Set objShell = CreateObject("Wscript.Shell")
VBS strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
VBS objShell.Run strCommand, 0, False
End If

If Form1.InputBox5.Text <> xl2 Then //设置验证码*****************************************
MessageBox "验证码错误"
Delay 1000
KeyPress "F12", 1
EndScript
End If

这个怎么改？在哪里写入正确的验证码位置 标注一下 求大牛啊 ~

Answer 1

给你翻译一下
If Form1.InputBox5.Text <> xl2 Then //设置验证码*****************************************

Form1是窗体、 InputBox5是窗体内的输入框5、 Text是输入框5之中的文本内容
<> xl2 是 不等于xl2
总结一下上面这句的意思就是：

如果窗体1之中的输入框5中的文本内容 不等于xl2的话
弹出窗口 "验证码错误"
MessageBox "验证码错误"
Delay 1000
键盘按F12一次 (应该是结束脚本运行的操作)
KeyPress "F12", 1
EndScript