易语言access数据库用sql命令查询结果怎么显示在超级列表框里？

.版本 2

.支持库 eDB

.支持库 iext

.子程序 _开始查找_被单击

.局部变量 总记录数量, 整数型

.局部变量 用户名, 文本型

.局部变量 密码, 文本型

.局部变量 用户类型, 文本型

.局部变量 索引, 整数型

' 这里是你的内容，请加上

总记录数量 ＝ 记录集1.记录数量

.如果真 (总记录数量 ＝ 0)

    信息框 (“暂没找到你所需要的数据！”, 0, , )

    返回 ()

.如果真结束

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

记录集1.到首记录 ()

.判断循环首 (记录集1.尾记录后 ＝ 假)

    记录集1.读文本 (“用户名字段”, 用户名)

    记录集1.读文本 (“密码字段”, 密码)

    记录集1.读文本 (“用户类型字段”, 用户类型)

    索引 ＝ 超级列表框1.插入表项 (-1, “”, , , , )

    超级列表框1.置标题 (索引, 0, 用户名)

    超级列表框1.置标题 (索引, 1, 密码)

    超级列表框1.置标题 (索引, 2, 用户类型)

    记录集1.到下一条 ()

.判断循环尾 ()

记录集1.关闭 ()

数据库连接1.关闭 ()