Question

易语言如何读出数据库中相同名称的数量？假如数据库中有N个姓名为小张，如何知道N为多少？

Answer 1

这是以前写给别人的，稍微改改就能用

.版本 2.支持库 PBShell.程序集 窗口程序集1.子程序 _按钮1_被单击.局部变量 单位, 单位信息, , "0".局部变量 n1, 整数型.局部变量 姓名计次, 整数型.局部变量 局部单位, 单位信息置当前库 (“测试数据库.edb”)跳到 (1).计次循环首 (取记录数 (), n1) .计次循环首 (取数组成员数 (单位), 姓名计次) .判断开始 (单位 [姓名计次].姓名 ＝ 读 (1)) 跳出循环 () .默认 .判断结束 .计次循环尾 () .判断开始 (姓名计次 ＞ 取数组成员数 (单位)) 局部单位.姓名 ＝ 读 (1) 局部单位.所有收入 ＝ 读 (2) 加入成员 (单位, 局部单位) .默认 单位 [姓名计次].所有收入 ＝ 单位 [姓名计次].所有收入 ＋ 读 (2) .判断结束 跳过 ().计次循环尾 ().计次循环首 (取数组成员数 (单位), n1) 列表框1.加入项目 (单位 [n1].姓名 ＋ “：他的总收入为” ＋ 到文本 (单位 [n1].所有收入) ＋ “元”, ).计次循环尾 ().子程序 __启动窗口_创建完毕打开 (取特定目录 (3) ＋ “测试数据库.edb”, , , , , , )嘿嘿 怎么样是不是很简单啊