易语言 sql查询语句如何显示到超级列表框

数据库连接1.连接Access (“data.mdb”, “”)

.版本 2
.支持库 iext
.支持库 eDB

.子程序 刷新结果列表

超级列表框1.全部删除 ()
记录集1.到首记录 ()
.判断循环首 (记录集1.尾记录后 ＝ 假)
超级列表框1.插入表项 (, , , , , )
记录集1.读文本 (“编号”, 编号) ' 编号是整数型的，这里用文本接收也正常
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, 编号)
记录集1.读文本 (“商品名称”, 商品名称)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 1, 商品名称)
记录集1.读文本 (“商品规格”, 商品规格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 2, 商品规格)
记录集1.读文本 (“商品数量”, 商品数量)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 3, 商品数量)
记录集1.读文本 (“单位”, 单位)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 4, 单位)
记录集1.读文本 (“进货价格”, 进货价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 5, 进货价格)
记录集1.读文本 (“同行价格”, 同行价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 6, 同行价格)
记录集1.读文本 (“销售价格”, 销售价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 7, 销售价格)
记录集1.读文本 (“市场价格”, 市场价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 8, 市场价格)
记录集1.读日期时间 (“入库时间”, 入库时间)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 9, 到文本 (入库时间))
记录集1.读文本 (“商品介绍”, 商品介绍)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 10, 商品介绍)
记录集1.到下一条 ()
.判断循环尾 ()
记录集1.关闭 ()

下面是查找的

.版本 2
.支持库 eDB

.子程序 _查找编辑框1_内容被改变

.如果 (组合框1.内容 ＝ “商品规格”)
_启动窗口.记录集1.打开 (“SELECT * FROM 商品 WHERE 商品规格 like '%” ＋ 查找编辑框1.内容 ＋ “%'”, #SQL语句)
.否则
.如果 (组合框1.内容 ＝ “编号”)
_启动窗口.记录集1.打开 (“SELECT * FROM 商品 WHERE 编号 like '%” ＋ 查找编辑框1.内容 ＋ “%'”, #SQL语句)
.否则
_启动窗口.记录集1.打开 (“SELECT * FROM 商品 WHERE 商品名称 like '%” ＋ 查找编辑框1.内容 ＋ “%'”, #SQL语句)
.如果结束

.如果结束
刷新结果列表 ()
另外,站长团上有产品团购,便宜有保证

你这赏金也太高了！