sostudy 2022-04-20 12:55
浏览 112
已结题

按键精灵 能不能实现若干个Sub 子程序的循环调用?(语言-按键精灵)

问题遇到的现象和发生背景

定义了若干个sub子程序a1至a6,在一个for循环中需要依次执行子程序a1至a6

问题相关代码,请勿粘贴截图
运行结果及报错内容

运行正常,想进一步优化、简短一下代码

我的解答思路和尝试过的方法
我想要达到的结果

在for循环中,在嵌套一个循环,以实现缩减代码
原代码类似与如下:
for 6
call a1
call a2
call a3
call a4
call a5
call a6
i++
next
优化后希望得到如下代码并能正常运行:
for 6
for 6
call aj
j++
next
i++
next
相关代码截图:
for循环内部分代码:

img

子程序a1代码,其他类似

img

  • 写回答

1条回答 默认 最新

  • sostudy 2022-04-20 19:38
    关注

    i = 0
    d = 1
    For t
    For 7
    Call rw
    i = i + 1
    d = d + 1
    Next
    Next

    Sub rw
    Select Case i
    Case 0
    Call xjrw
    Call a
    Call a1
    Call b1
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case 1
    Call xjrw
    Call a
    Call a2
    Call b2
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case 2
    Call xjrw
    Call a
    Call a3
    Call b3
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case 3
    Call xjrw
    Call a
    Call a4
    Call b4
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case 4
    Call xjrw
    Call a
    Call a5
    Call b5
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case 5
    Call xjrw
    Call a
    Call a6
    Call b6
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case 6
    Call xjrw
    Call a
    Call a7
    Call b7
    Call qysz
    MoveTo 842, 652
    Delay 100
    LeftClick 1
    Case Else
    //否则
    End Select
    End Sub

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

问题事件

  • 系统已结题 4月28日
  • 已采纳回答 4月20日
  • 创建了问题 4月20日

悬赏问题

  • ¥20 wireshark抓不到vlan
  • ¥20 关于#stm32#的问题:需要指导自动酸碱滴定仪的原理图程序代码及仿真
  • ¥20 设计一款异域新娘的视频相亲软件需要哪些技术支持
  • ¥15 stata安慰剂检验作图但是真实值不出现在图上
  • ¥15 c程序不知道为什么得不到结果
  • ¥40 复杂的限制性的商函数处理
  • ¥15 程序不包含适用于入口点的静态Main方法
  • ¥15 素材场景中光线烘焙后灯光失效
  • ¥15 请教一下各位,为什么我这个没有实现模拟点击
  • ¥15 执行 virtuoso 命令后,界面没有,cadence 启动不起来