请问如何办（详细请看帖子）

Question

我现在有一个数据表（Access做的）有两个字段a(文本类型）aa(文本类型)，怎么样用两个List控件来显示两个字段的内容呢？谢谢！

Answer 1

分别用SELECT语句读出来RECORDSET接收，用RECORDSET.RECORDCOUNT做循环控制次数在LIST控件添加:List.additem recordset.field(0)就可以了

Answer 2

dim cn As New ADODB.Connection
dim rs as new adodb.recordsetdim sql as string sql ="select a,aa from tablename"
set rs=cn.execute(sql)do while not rs.eof
   listbox1.additem rs("a")
   listbox2.additem rs("aa")
   
   rs.movenext
loop