怎么将易语言edb内容放到编辑框中,一条读取完调至下一条,不重复

如题所述

参考下面的代码
-----------------------------------------------------------
.版本 2

.子程序 打开所有数据库

.如果真 (打开 (取运行目录 () + “\data\khxx.edb”, , , , , “M2CRJGC”, ) = 假)
信息框 (“打开失败,无法打开数据库,程序即将退出!”, 0, “警告!”)
全部关闭 ()
结束 ()
------------------------------------------
.版本 2

编辑框1.是否允许多行 = 真
编辑框1.滚动条 = 2
编辑框1.内容 = “”
置当前库 (“khxx”)
到首记录 ()
.判断循环首 (尾记录后 () = 假)
.如果真 (读 (#客户姓名) ≠ “”)
编辑框1.加入文本 (读 (#客户姓名) + #换行符)

.如果真结束

跳过 ()
.判断循环尾 ()追问

我有代码,但不能在编辑框显示,我想在编辑框显示
打开 (“C:\Documents and Settings\Administrator\桌面\1\users.edb”, , , , , , )
.计次循环首 (取记录数 (), i)
跳到 (i)
当前字段内容 = 读字段 (“用户”, )
.判断开始 (取文本右边 (当前字段内容, 1) = “*”)
.默认
编辑框1.内容 = 当前字段内容
修改 (当前字段内容 + “*”)
.判断结束
.计次循环尾 ()

追答

源码可以给我看下修改吗?邮箱:qianlei93033@vip.qq.com

温馨提示:内容为网友见解,仅供参考
第1个回答  2012-02-06
读入文本

怎么将易语言edb内容放到编辑框中,一条读取完调至下一条,不重复
编辑框1.是否允许多行 = 真 编辑框1.滚动条 = 2 编辑框1.内容 = “”置当前库 (“khxx”)到首记录 ().判断循环首 (尾记录后 () = 假).如果真 (读 (#客户姓名) ≠ “”)编辑框1.加入文本 (读 (#客户姓名) + #换行符).如果真结束 跳过 ().判断循环尾 ()...

易语言如何将EDB数据库内容查找并显示在编辑框中
查找 (读 (“收入日期”) = 编辑框1.内容)编辑框2.内容 = 读 (“收入金额”)编辑框3.内容 = 读 (“收入说明”).如有问题请追问

易语言里面怎么把数据库里面的数据读出来 放在编辑框里面
.子程序 __启动窗口_创建完毕 编辑框1.是否允许多行 =真 数据库提供者1.数据库文件名 =“D:\\123.edb” 数据源1.数据提供者 = “数据库提供者1” 编辑框1.加入文本 (“用户名 密码”) .计次循环首 (数据源1.取行数 (), i) 编辑框1.加入文本 (#换行符) 编辑框1.加入文本 (数据源1.取文本 (...

易语言 怎么讲一个通过数据库查询到的数据集内容,填写到编辑框中?
记录集1.读文本 (“id_name ← 这里是表项名称 ”, 名称 ← 这里变量名 )编辑框1.加入文本()+#换行符 ← 这里是 编辑框获到的文本或数值 记录集1.到下一条 ().判断循环尾 ()记录集1.关闭 ()

易语言如何将edb数据库在别的机器也可以调用,我在自己机器调试是没问...
写到资源中,运行程序前判断数据库文件是否存在,不存在就写到文件()。。。,或者直接创建数据库,然后数据库1.数据库文件名=。。。

易语言:怎么把多个编辑框内容存edb指定的位置
0, , ) 编辑框_姓名.获取焦点 () 返回 ().如果真结束.如果真 (取反 (写 (2, 编辑框_身份证.内容))) 信息框 (“身份证写入失败.”, 0, , ) 编辑框_身份证.获取焦点 () 返回 ().如果真结束.如果真 (取反 (写 (3, 编辑框_身份证地址.内容))) 信息框 (“...

...将EDB数据库中的内容查询到并且显示在编辑框中,控件有按钮,编辑框...
连续赋值(“”,编辑框1.内容,编辑框2.内容)即可把两个编辑框的内容都变成"" 要添加更多编辑框 只要后面加个 , 然后就可以了 例如如果是三个编辑框 连续赋值(“”,编辑框1.内容,编辑框2.内容,编辑框3.内容)甚至更多 连续赋值(“”,编辑框1.内容,编辑框2.内容,编辑框3.内容,编辑...

易语言如何寻找edb数据库里面内容! 如:我想找里面内容是否编辑框1...
打开 (取当前目录 () + “\\data\\Meer.edb”, , , , , , )到首记录 ().版本 2 .如果 (编辑框1.内容 ≠ 读 (“账号”)) ' 账号就是数据库对应的项。服务器1.发送数据 (客户地址, “IssueAnswer”, 6)‘ 存在 .否则 服务器1.发送数据 (客户地址, “Permissions”, 6)‘不存在。

易语言 高级表格读出的数据,我想双击某行后自动将某行内容自动填充到相...
创建 (取运行目录 () + “\\数据库.edb”, 字段).子程序 _按钮1_被单击 .如果真 (按钮1.标题 = “修改”)修改数据库 ()_超级列表框1_右键单击表项 ()返回 ().如果真结束 .如果真 (编辑框1.内容 = “”)信息框 (“姓名不能为空!”, 0, )返回 ().如果真结束 加记录 (编辑框...

如何将易语言编辑框内的值保存到数据库edb中呢?
先建一个电话号码薄的窗口:姓名编辑框,工作单位编辑框,电话号码编辑框。并添加一个“按钮1”。然后创建“电话号码薄.edb”数据库。在窗口程序中填入:.版本 2 .子程序 __启动窗口_创建完毕 .子程序 _按钮1_被单击 .如果 (信息框 (“请检查填写是否正确,登记后无法更改,确定吗?”, 4, ) ...

相似回答