Question

易语言 ACCESS数据库条件查找到超级列表框 求助```

按条件查询已经可以了 但新问题又来了， 按姓名查询 有些相同的姓名我要依次列出来 该怎么写？？.版本 2.支持库 iext.支持库 eDB.子程序 读出数据1.局部变量 姓名, 文本型.局部变量 字派, 文本型.局部变量 性别, 文本型.局部变量 出生年月, 文本型.局部变量 电话, 文本型.局部变量 详细地址, 文本型.局部变量 SQL, 文本型.局部变量 a, 整数型超级列表框1.全部删除 ()记录集1.到首记录 ().计次循环首 (记录集1.记录数量, a) 记录集1.查找 (“姓名='” ＋ 编辑框1.内容 ＋ “'”, #正向搜索) 记录集1.读文本 (“姓名”, 姓名) 记录集1.读文本 (“字派”, 字派) 记录集1.读文本 (“性别”, 性别) 记录集1.读文本 (“出生年月”, 出生年月) 记录集1.读文本 (“电话”, 电话) 记录集1.读文本 (“详细地址”, 详细地址) 超级列表框1.插入表项 (, , , , , ) 超级列表框1.置标题 (a － 1, 0, 姓名) 超级列表框1.置标题 (a － 1, 1, 字派) 超级列表框1.置标题 (a － 1, 2, 性别) 超级列表框1.置标题 (a － 1, 3, 到文本 (出生年月)) 超级列表框1.置标题 (a － 1, 4, 电话) 超级列表框1.置标题 (a － 1, 5, 详细地址) 记录集1.到下一条 ().计次循环尾 ()这样写如果查询最后一条记录的时候 会显示数据库中总共多少条他就显示多少条同样的记录``

Answer 1

.版本 2
.支持库 eDB
.支持库 iext
.子程序 读出数据1
.局部变量 姓名, 文本型
.局部变量 字派, 文本型
.局部变量 出生年月, 文本型
.局部变量 电话, 文本型
.局部变量 详细地址, 文本型
.局部变量 SQL
.局部变量 a, 整数型
性别, 文本型
文本型
超级列表框1.全部删除 ()
.如果真 (记录集1.查找 (“姓名='” ＋ 编辑框1.内容 ＋ “'”, #正向搜索) ＝ 假) ' 如果没找找就返回，不用往后面执行了。
返回 ()
.如果真结束
' 查找完成后，如果你需要数量可以在这里取 记录集1.记录数量
' 找到要的结果就往下执行读到列表框
.循环判断首 ()
记录集1.读文本 (“姓名”, 姓名)
记录集1.读文本 (“字派”, 字派)
记录集1.读文本 (“性别”, 性别)
记录集1.读文本
(“出生年月”, 出生年月)
记录集1.读文本 (“电话”, 电话)
记录集1.读文本 (“详细地址”, 详细地址)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (a － 1, 0, 姓名)
超级列表框1.置标题 (a －
1, 1, 字派)
超级列表框1.置标题 (a － 1, 2, 性别)
超级列表框1.置标题 (a － 1, 3, 到文本
(出生年月))
超级列表框1.置标题 (a － 1, 4, 电话)
超级列表框1.置标题 (a － 1, 5, 详细地址)
.循环判断尾 (记录集1.查找下一个 ()) ' 读完一个再查找符合条件的下一个，如果找到了就会回到循环首继续执行，没找到就会跳出循环。

你写的那些代码逻辑有问题，把上面这个复制过去就行了。

追问

还是找不到数据`` 循环判断首 里面的 超级列表框1.置标题 (a － 1 ） a 好像不行吧``

追答

哦，按下面的内容改一下就好。
.版本 2
.支持库 iext
索引 ＝ 超级列表框1.插入表项 (, 姓名, , , , )
超级列表框1.置标题 (索引, 1, 字派)
超级列表框1.置标题 (索引, 2, 性别)
超级列表框1.置标题 (索引, 3, 到文本 (出生年月))
超级列表框1.置标题 (索引, 4, 电话)
超级列表框1.置标题 (索引, 5, 详细地址)