.版本 2
.程序集 窗口程序集1.程序集变量 单选框, 单选框, , "5"
.子程序 __启动窗口_创建完毕.局部变量 i, 整数型
单选框1.可视 ＝ 假 ' 被复制的单选框因为不在数组里,不好控制,所以干脆让它隐藏掉
.计次循环首 (5, i)
复制窗口组件 (单选框1, 单选框 [i])
单选框 [i].左边 ＝ 单选框1.左边 ＋ 单选框1.宽度 × i
单选框 [i].可视 ＝ 真
.计次循环尾 ()
.子程序 _单选框1_被单击
.局部变量 局部_单选框, 单选框
.局部变量 i, 整数型
局部_单选框 ＝ 取事件组件 ()
.计次循环首 (取数组成员数 (单选框), i)
.如果真 (单选框 [i] ＝ 局部_单选框)
信息框 (“举一反三!”, 0, )
.如果真结束
.计次循环尾 ()
至于这个数组是谁, 建议你用数据类型 在添加数组成员时 做个记号或者起个名字之类的
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024