程序中经常使用到超级列表框,所以记录下来了
一般配合循环使用
例如:
代码分享
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
.版本 2
.支持库 iext
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 索引, 整数型
.局部变量 已经循环次数, 整数型
.局部变量 将要循环次数, 整数型
将要循环次数 = 到整数 (编辑框1.内容) ' 这个循环次数需要自己手动填写
.计次循环首 (将要循环次数, 已经循环次数)
索引 = 超级列表框1.插入表项 (, , , , , ) ' 插入表项就是插入行,下面的置标题需要用到表项索引,现有行后有索引
调试输出 (已经循环次数)
编辑框_ID.内容 = 到文本 (取随机数 (1, 1000)) ' 懒,不想打字,就弄随机数了,【1,1000】的意思是从1-1000取随机数,就是保证是4位数以下
编辑框_姓名.内容 = 到文本 (取随机数 (1, 1000))
编辑框_性别.内容 = 到文本 (取随机数 (1, 1000))
编辑框_年龄.内容 = 到文本 (取随机数 (1, 1000))
编辑框_身份证.内容 = 到文本 (取随机数 (1, 1000))
编辑框_备注.内容 = 到文本 (取随机数 (1, 1000))
超级列表框1.置标题 (索引, 0, 编辑框_ID.内容) ' 索引是插入行,【0】是第一列,即ID列,最后一列是备注列【5】
超级列表框1.置标题 (索引, 1, 编辑框_姓名.内容)
超级列表框1.置标题 (索引, 2, 编辑框_性别.内容)
超级列表框1.置标题 (索引, 3, 编辑框_年龄.内容)
超级列表框1.置标题 (索引, 4, 编辑框_身份证.内容)
超级列表框1.置标题 (索引, 5, 编辑框_备注.内容)
.计次循环尾 ()
|
以上就是全部实例内容,感谢大家对服务器之家的支持。