.版本 2
.支持库 iext
.子程序 _窗口2_创建完毕
.局部变量 索引, 整数型
.局部变量 i, 整数型
打开 (取运行目录 () + “\1.edb”, , , , , , )
到首记录 ()
.计次循环首 (取记录数 (), i)
超级列表框1.置标题 (索引, 0, 读字段 (1, ))
超级列表框1.置标题 (索引, 1, 读字段 (2, ))
跳过 ()
.计次循环尾 ()
如果是易语言自带的数据库那就简单了。判断(打开(“.\数据库名.edb”,,,,))
到首记录()
计次循环首(取记录数(),x)
判断(读("性别“)=”男“)
c=超级列表框.插入表项(,,,,,)
超级列表框.置标题(c,0,读(“姓名”))
超级列表框.置标题(c,1,读(“班级”))
超级列表框.置标题(c,2,读(“年龄”))
跳过()
计次循环尾()
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)