链接数据库。查询你需要显示的内容。
for 循环 使用 list.AddItem "添加的内容" 讲需要显示的多条信息显示出来。就完成了。
这个有两种方法:1:直接从Rst里读取数据,在Rst获得数据集合的时候
List1.Clear
rst.MoveFirst
Do While Not rst.EOF
List1.AddItem rst.Fields("text1") '这里把字段名修改成数据表里的实际字段名
rst.MoveNext
Loop
2:通过MSHFlexGrid1网格控件,向list添加数据
略
DIM MyConnection as new oleDB("Provider = Microsoft.Jet.OLEDB.4.0Source Path =" +Application.StartUpPath" + "\你数据库文件名")Dim MyCommand as oleDBCommand
MyCommand = "Select * From 表名 Where 字段名 = '" &list1.list(i) &"'",MyConnection)
MyCommand.ExectueNonQuery
帮你写了个小的读取list1中一项并在Access中查询的片段。你看看管用不。前面的空间命名System.Data.OLEDB
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)