窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集1 | | | |
变量名 | 类 型 | 数组 | 备 注 |
程序集_个人信息 | 数据类型_个人信息 | 0 |
XP风格 (3
)单选框_男.选中 = 真
重定义数组 (程序集_个人信息, 真,
取数组成员数 (程序集_个人信息
) + 1
)程序集_个人信息
[取数组成员数 (程序集_个人信息
)].成员_姓名 = 编辑框_姓名.内容
程序集_个人信息
[取数组成员数 (程序集_个人信息
)].成员_年龄 =
到数值 (编辑框_年龄.内容
)
如果 (单选框_女.选中 =
真)局部_性别 =
“女”单选框_男.选中 = 假

如果 (单选框_男.选中 =
真)局部_性别 =
“男”单选框_女.选中 = 假




程序集_个人信息 [取数组成员数 (程序集_个人信息)].成员_性别 = 局部_性别程序集_个人信息
[取数组成员数 (程序集_个人信息
)].成员_住址 = 编辑框_住址.内容
程序集_个人信息
[取数组成员数 (程序集_个人信息
)].成员_电话 = 编辑框_电话.内容
程序集_个人信息
[取数组成员数 (程序集_个人信息
)].成员_邮箱 = 编辑框_EMAIL.内容
超级列表框1.
全部删除 ()子程序_显示 ()变量名 | 类 型 | 静态 | 数组 | 备 注 |
局部_计次 | 整数型 | | |
局部_当前行 | 整数型 | | |
计次循环首 (取数组成员数 (程序集_个人信息
), 局部_计次
)局部_当前行 = 超级列表框1.
插入表项 (, 程序集_个人信息
[局部_计次
].成员_姓名, , , ,
)超级列表框1.
置标题 (局部_当前行, 1,
到文本 (程序集_个人信息
[局部_计次
].成员_年龄
))
超级列表框1.
置标题 (局部_当前行, 2, 程序集_个人信息
[局部_计次
].成员_性别
)超级列表框1.
置标题 (局部_当前行, 3, 程序集_个人信息
[局部_计次
].成员_住址
)超级列表框1.
置标题 (局部_当前行, 4, 程序集_个人信息
[局部_计次
].成员_电话
)超级列表框1.
置标题 (局部_当前行, 5, 程序集_个人信息
[局部_计次
].成员_邮箱
)
计次循环尾 () 学习时练习的源码发出来新手学习,高手略过呵呵。