易语言，如何添加编辑框的信息到数据库，将添加的读出到列表框。

添加组件：数据源、数据源提供者

=========================================

.版本 2

.程序集 窗口程序集1

.程序集变量 i, 整数型

.子程序 __启动窗口_创建完毕

编辑框1.是否允许多行 ＝ 真

数据库提供者1.数据库文件名 ＝ “D:\123.edb”

数据源1.数据提供者 ＝ “数据库提供者1”

编辑框1.加入文本 (“用户名 密码”)

.计次循环首 (数据源1.取行数 (), i)

编辑框1.加入文本 (#换行符)

编辑框1.加入文本 (数据源1.取文本 (i, 1) ＋ “ ” ＋ 数据源1.取文本 (i, 2))

.计次循环尾 ()

如果是易语言自带的数据库那就简单了。

判断（打开（“.\数据库名.edb”，，，，））

到首记录（）

计次循环首（取记录数（），x）

判断（读（"性别“）=”男“）

c=超级列表框.插入表项（，，，，，）

超级列表框.置标题（c,0,读（“姓名”））

超级列表框.置标题（c,1,读（“班级”））

超级列表框.置标题（c,2,读（“年龄”））

跳过（）

计次循环尾（）

---