按键精灵Inputbox根据输入的变量,执行不同的命令
我用按键精灵,弹出窗口,然后输入一个变量。用SelectCase根据变量,获得不同的时间组值,用于执行操作命令的多个时间差。问题1:DelayT?显示语法错误,怎么办?因...
我用按键精灵,弹出窗口,然后输入一个变量。用Select Case根据变量,获得不同的时间组值,用于执行操作命令的多个时间差。
问题1:Delay T? 显示语法错误,怎么办?
因为是小白,求大神科普。我用的命令对吗?应该用什么其他指令?
SetSimMode 2
Input = InputBox("请输入一个数字")
TracePrint ("输入: " & Input)
Dim A
a = ("输入: " & Input)
Select Case a
Case a=1
//情况1
T1 = 1000
Y1 = 2000
U1 = 3000
I1 = 4000
Case a=2
//情况2
T2 = 10000
Y2 = 20000
U2 = 30000
I2 = 40000
Case a = 3
//情况3
T3 = 100000
Y3 = 200000
U3 = 300000
I3 = 400000
Case Else
//否则
End Select
MoveTo 1236, 563
LeftClick 1
Delay T?
MoveTo 1308, 571
LeftClick 1 展开
问题1:Delay T? 显示语法错误,怎么办?
因为是小白,求大神科普。我用的命令对吗?应该用什么其他指令?
SetSimMode 2
Input = InputBox("请输入一个数字")
TracePrint ("输入: " & Input)
Dim A
a = ("输入: " & Input)
Select Case a
Case a=1
//情况1
T1 = 1000
Y1 = 2000
U1 = 3000
I1 = 4000
Case a=2
//情况2
T2 = 10000
Y2 = 20000
U2 = 30000
I2 = 40000
Case a = 3
//情况3
T3 = 100000
Y3 = 200000
U3 = 300000
I3 = 400000
Case Else
//否则
End Select
MoveTo 1236, 563
LeftClick 1
Delay T?
MoveTo 1308, 571
LeftClick 1 展开
展开全部
SetSimMode 2
Input = InputBox("请输入一个数字")
TracePrint ("输入: " & Input)
Dim A
a = ("输入: " & Input)
Select Case a
Case "输入: 1" //情况1
T1 = 1000
Y1 = 2000
U1 = 3000
I1 = 4000
Case "输入: 2" //情况2
T2 = 10000
Y2 = 20000
U2 = 30000
I2 = 40000
Case "输入:3" //情况3
T3 = 100000
Y3 = 200000
U3 = 300000
I3 = 400000
Case Else
//否则
End Select
MoveTo 1236, 563
LeftClick 1
Delay T?
MoveTo 1308, 571
LeftClick 1
变量 a 因为合并了 字符串 所以是 字符串 串变量 ,VBS 会强制把变量转换为字符串
追问
大侠,你发的代码,也是有问题啊。Delay T?语法错误
时间延迟T?问题在哪
追答
Delay 我复制你的,你打错的,你加个200好了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询