• 按键公众号 ：
按键精灵电脑版
立即下载

软件版本：2014.06
软件大小：22.9M
更新时间：2021-12-03

按键精灵安卓版
立即下载

软件版本：3.7.2
软件大小：46.2M
更新时间：2023-05-10

按键精灵iOS版
立即下载

软件版本：1.8.0
软件大小：29.2M
更新时间：2023-03-21

按键手机助手
立即下载

软件版本：3.8.0
软件大小：262M
更新时间：2023-05-30

快捷导航

请 登录 后使用快捷导航
没有帐号？ 注册

登录 注册
返回列表
发新话题 回复该主题
查看: 10044|回复: 2

【脚本源码】[9.x例子]子程序的参数数组传递 [复制链接]

兄弟工程师01
头像

  • 版主
  • 211464
  • 21164
  • 13
  • 258 朵
  • 47817 个
  • 60 个
  • 263800
  • 2008-12-23
按键精灵开发者4级兔年勋章论坛MM小红帽学有所成按键元老管理人员
1#
t T
发表于 2011-12-27 16:39 | |只看楼主
【脚本源码】[9.x例子]子程序的参数数组传递
  1. Dim a(1)
  2. a(0) = 10000
  3. a(1) = 1
  4. Call b(a)

  6. //以下是子程序
  7. Sub b(c)
  8. TracePrint "数组下标最大值：" & UBound(c)
  9. TracePrint "数组0=" & c(0)
  10. TracePrint "数组1=" & c(1)
  11. TracePrint "计算数组值：" & c(0) + c(1)
  12. End Sub
复制代码
  1. a = Array(10000,1)
  2. Call b(a)
  3. //以下是子程序
  4. Sub b(c)
  5. TracePrint "数组下标最大值：" & UBound(c)
  6. TracePrint "数组0=" & c(0)
  7. TracePrint "数组1=" & c(1)
  8. TracePrint "计算数组值：" & c(0) + c(1)
  9. End Sub
复制代码

    已有3评分我要评分查看所有评分
    点赞
    【按键精灵手机版】按键精灵安卓版v3.0发布啦~体验送现金红包哦！！

    【按键精灵2014.03.16412版】这是有史以来最稳定的版本，不信你用一个？

    .
    回顶部
    ac018630ac
    头像

    ac018630ac

    • 小学六年级
    • 210874
    • 114
    • 0
    • -23 朵
    • 300 个
    • -6 个
    • 2380
    • 2008-12-19
    2#
    t T
    发表于 2017-10-21 10:11 | |只看该用户

    写的不错~！

    回顶部
    乡村小胡子
    头像

    风神大师

    • 初中二年级
    • 3766205
    • 239
    • 0
    • 8 朵
    • 1803 个
    • 169 个
    • 5680
    • 2016-02-19
    按键精灵开发者5级
    3#
    t T
    发表于 2018-01-09 11:51 | |只看该用户

    可以

    回顶部
    上一主题| 下一主题
    返回列表
    发新话题 回复该主题
    高级编辑器高级编辑器