|
发表于 2018-3-12 14:02:55
|
显示全部楼层
柬埔寨
.版本 2
.支持库 spec
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 数组, 整数型, , "0"
.局部变量 勾选数量, 整数型
.局部变量 i, 整数型
勾选数量 = 超级列表框_取被勾选表象 (超级列表框1, 数组)
.计次循环首 (勾选数量, i)
调试输出 (超级列表框1.取标题 (数组 [i], 0))
.计次循环尾 ()
.子程序 超级列表框_取被勾选表象, 整数型, , 返回被勾选的数量
.参数 超级列表框名称, 超级列表框
.参数 返回被勾选的表象索引数组, 整数型, 参考 数组
.局部变量 a, 整数型
.局部变量 i, 整数型
.局部变量 勾选数, 整数型
清除数组 (返回被勾选的表象索引数组)
勾选数 = 0
a = 超级列表框名称.取表项数 ()
.计次循环首 (a, i)
.如果 (超级列表框名称.取当前状态图片 (i - 1) = 1)
加入成员 (返回被勾选的表象索引数组, i - 1)
勾选数 = 勾选数 + 1
.否则
.如果结束
.计次循环尾 ()
返回 (勾选数)
|
|