数据库与超级列表框

⑴ 易语言超级列表框与数据库

数据库连接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语句)
.如果结束

.如果结束
刷新结果列表 ()

⑵ 易语言数据库与超级列表框同步

access应该是数据库里最简单的，但光学数据库没用啊

VB是语言里最简单的

C语言比VB稍微麻烦点，但它是C++、C#的基础，以后要往.net方向发展的话还是把C语言基础打好吧

不过语言也是一通百通的，呵呵

⑶ 在数据库中查询并写入超级列表框

分析:
1.SQL语句:select
*
from
nametable
where
name
like
'"&from1.textbox1.text&"'
2.窗体1按钮事件:From2.show()
3.窗体2:不知道你的超级列表框是什么，我建议使用Combobox或Datagridview控件。
最好是Datagridview绑定控件。
4.窗体2添加函数绑定数据:
public
sub
selectview()
'绑定的数据代码
end
sub
5.窗体2load事件添加selectview()
你按照上面的去做，保证能得到你满意的数据。