按键精灵写的脚本,excel已复制单元格,请帮忙修改下能够运行 5
a=Plugin.Sys.GetCLB()Ifa="番茄"ThenKeyDown"Right",1ElseIfa="茄子"ThenKeyDown"Right",2EndI...
a = Plugin.Sys.GetCLB()
If a = "番茄" Then
KeyDown "Right", 1
ElseIf a = "茄子" Then
KeyDown "Right", 2
End If 展开
If a = "番茄" Then
KeyDown "Right", 1
ElseIf a = "茄子" Then
KeyDown "Right", 2
End If 展开
1个回答
展开全部
a = Plugin.Sys.GetCLB() //把剪贴板内容赋值给变量a
If a = "番茄" Then //如果变量a的内容=番茄为真
KeyDown "Right", 1 //键盘按下方向键右键
ElseIf a = "茄子" Then //否则如果变量a的内容=茄子为真
KeyDown "Right", 2 //键盘按下方向键右键两次
End If //如果结束
上面问题出在键盘按键只有按下没有弹起 ,正常操作是需要按下弹起才
能再次按下的。如果需要按键可以用KeyPress "Right", 1
If a = "番茄" Then //如果变量a的内容=番茄为真
KeyDown "Right", 1 //键盘按下方向键右键
ElseIf a = "茄子" Then //否则如果变量a的内容=茄子为真
KeyDown "Right", 2 //键盘按下方向键右键两次
End If //如果结束
上面问题出在键盘按键只有按下没有弹起 ,正常操作是需要按下弹起才
能再次按下的。如果需要按键可以用KeyPress "Right", 1
追问
a = Plugin.Sys.GetCLB()
If a = "番茄" Then
KeyPress "Right", 1
ElseIf a = "茄子" Then
KeyPress "Right", 2
End If
调试了,还是不行啊,麻烦再帮忙看看
追答
你那个意思是达到了,具体你要怎么弄我也不清楚啊。比如你按一次右方向键和按两次右方向键干嘛的 我都不清楚
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询