易语言里面怎么把数据库里面的数据读出来 放在编辑框里面

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

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

版本 2

程序集 窗口程序集1

程序集变量 i, 整数型

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

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

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

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

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

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

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

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

计次循环尾 ()

版本 2

支持库 iext

程序集 窗口程序集1

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

如果真 (文件是否存在 (取运行目录 () ＋ “\数据库edb”) ＝ 假)

  创建数据库 ()

如果真结束

打开 (取运行目录 () ＋ “\数据库edb”, “数据库”, , , , , )

子程序 创建数据库

局部变量 字段, 字段信息, , "2"

字段 [1]名称 ＝ “部门”

字段 [1]类型 ＝ #文本型

字段 [1]最大文本长度 ＝ 20

字段 [2]名称 ＝ “姓名”

字段 [2]类型 ＝ #文本型

字段 [2]最大文本长度 ＝ 8

创建 (取运行目录 () ＋ “\数据库edb”, 字段)

子程序 _按钮1_被单击

如果真 (编辑框1内容 ＝ “” 或 编辑框2内容 ＝ “”)

  信息框 (“请输入部门或姓名”, 0, )

  返回 ()

如果真结束

置当前库 (“数据库”)

加记录 (编辑框1内容, 编辑框2内容)

编辑框2内容 ＝ “”

编辑框2获取焦点 ()

子程序 _按钮2_被单击

局部变量 计次, 整数型

局部变量 部门, 文本型

局部变量 姓名, 文本型

局部变量 序号, 整数型

超级列表框1全部删除 ()

序号 ＝ 0

如果真 (编辑框1内容 ＝ “”)

  信息框 (“请输入部门”, 0, )

  返回 ()

如果真结束

置当前库 (“数据库”)

到首记录 ()

计次循环首 (取记录数 (), 计次)

  部门 ＝ 读 (“部门”)

  如果真 (部门 ＝ 编辑框1内容)

      姓名 ＝ 读 (“姓名”)

      超级列表框1插入表项 (-1, , , , , )

      超级列表框1置标题 (序号, 0, 到文本 (序号 ＋ 1))

      超级列表框1置标题 (序号, 1, 部门)

      超级列表框1置标题 (序号, 2, 姓名)

      序号 ＝ 序号 ＋ 1

  如果真结束

  跳过 ()

计次循环尾 ()

版本 2

子程序 _窗口2_创建完毕

置父窗口 (“_窗口2”)

置随机数种子 ()

标签1是否自动折行 ＝ 真

标签2是否自动折行 ＝ 真

标签1标题 ＝ “”

标签2标题 ＝ “”

打开 (取运行目录 () ＋ “\数据库edb”, “sjk”, , , , , )

子程序 _按钮1_被单击

局部变量 随机, 整数型

置当前库 (“sjk”)

到首记录 ()

随机 ＝ 取随机数 (1, 取记录数 ())

跳到 (随机)

标签1标题 ＝ 读 (“题目”)

标签2标题 ＝ 读 (“答案”)

----------------------------------

这是窗口2，窗口1你自已想吧。

以上就是关于易语言里面怎么把数据库里面的数据读出来 放在编辑框里面全部的内容，包括:易语言里面怎么把数据库里面的数据读出来 放在编辑框里面、易语言超级列表框读出符合编辑框条件的所有数据。、用易语言，在窗口1下新建一个edb数据库，并将一个excel表格中的数据导入到此数据库中，并在窗口2中调用等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！