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

按键精灵 能不能实现若干个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 11: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月27日
  • 已采纳回答 4月20日
  • 创建了问题 4月20日

悬赏问题

  • ¥15 爱快路由器端口更改错误导致无法访问
  • ¥20 安装catkin时遇到了如下问题请问该如何解决呢
  • ¥15 VAE模型如何输出结果
  • ¥15 编译python程序为pyd文件报错:{"source code string cannot contain null bytes"
  • ¥20 关于#r语言#的问题:广义加行模型拟合曲线后如何求拐点
  • ¥15 fluent设置了自动保存后,会有几个时间点不保存
  • ¥20 激光照射到四象线探测器,通过液晶屏显示X、Y值
  • ¥50 数据库开发问题求解答
  • ¥15 安装anaconda时报错
  • ¥15 小程序有个导出到插件方式,我是在分包下引入的插件,这个export的路径对吗,我看官方文档上写的是相对路径
手机看
程序员都在用的中文IT技术交流社区

程序员都在用的中文IT技术交流社区

专业的中文 IT 技术社区,与千万技术人共成长

专业的中文 IT 技术社区,与千万技术人共成长

关注【CSDN】视频号,行业资讯、技术分享精彩不断,直播好礼送不停!

关注【CSDN】视频号,行业资讯、技术分享精彩不断,直播好礼送不停!

客服 返回
顶部