VB list读取access数据库中的一列并显示出来

1：直接从Rst里读取数据，在Rst获得数据集合的时候

List1.Clear

rst.MoveFirst

Do

While

Not

rst.EOF

List1.AddItem

rst.Fields("text1")

'这里把字段名修改成数据表里的实际字段名

rst.MoveNext

Loop

2：通过MSHFlexGrid1网格控件，向list添加数据

略

链接数据库。查询你需要显示的内容。

for 循环 使用 list.AddItem "添加的内容" 讲需要显示的多条信息显示出来。就完成了。