|
发表于 2013-12-26 00:26:17
|
显示全部楼层
四川省绵阳市
.版本 2
.程序集 窗口程序集1
.程序集变量 人数分组框, 分组框, , "9"
.程序集变量 总人数, 编辑框, , "9"
.程序集变量 男生, 编辑框, , "9"
.程序集变量 女生, 编辑框, , "9"
.程序集变量 配置标题, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 局_计次, 整数型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 序号, 整数型
分组框.可视 = 假
.计次循环首 (3, y)
.计次循环首 (3, x)
序号 = 序号 + 1
复制窗口组件 (分组框, 人数分组框 [序号])
复制窗口组件 (编辑框_总人数, 总人数 [序号])
复制窗口组件 (编辑框_男生, 男生 [序号])
复制窗口组件 (编辑框_女生, 女生 [序号])
人数分组框 [序号].移动 ((x - 1) × 160, (y - 1) × 180, , )
总人数 [序号].置父窗口 (人数分组框 [序号])
男生 [序号].置父窗口 (人数分组框 [序号])
女生 [序号].置父窗口 (人数分组框 [序号])
总人数 [序号].内容 = 到文本 (序号)
人数分组框 [序号].可视 = 真
总人数 [序号].可视 = 真
男生 [序号].可视 = 真
女生 [序号].可视 = 真
.计次循环尾 ()
.计次循环尾 ()
配置标题 = “配置标题”
.子程序 _按钮1_被单击
.局部变量 局_计次, 整数型
.计次循环首 (9, 局_计次)
写配置项 (取当前目录 () + “/” + 配置标题 + “.ini”, “班级” + 到文本 (局_计次), “总人数”, 总人数 [局_计次].内容)
写配置项 (取当前目录 () + “/” + 配置标题 + “.ini”, “班级” + 到文本 (局_计次), “男生”, 男生 [局_计次].内容)
写配置项 (取当前目录 () + “/” + 配置标题 + “.ini”, “班级” + 到文本 (局_计次), “女生”, 女生 [局_计次].内容)
.计次循环尾 () |
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻 |
查看全部评分
|