我用VB查询Access中的表,只返回一条记录,郁闷!!

来源:百度知道 编辑:UC知道 时间:2024/06/09 09:36:33
我用VB编程,用ADO方式访问Access数据库中的一个表T1。(表T1有多条记录)。程序界面用MSHFlexGrid控件来显示表中的记录,查询语句是“Select * from T1”,但是程序运行起来后,MSHFlexGrid控件中只显示第一条记录,是什么原因呢?为什么其他的记录没有显示出来呢?
好郁闷啊!!!!!!
基本代码是这样的:
Conn.Open
Rs.Open "Select ID,PersonName,Sex,Date From T1", Conn

Set MSHFlexGrid1.DataSource = Rs
Rs.Close
Conn.Close

Rs.Close
Conn.Close
将以上两句注释掉.
Dim sql As String
conn.Open
sql = "Select ID,PersonName,Sex,Date From T1"
rs.Open sql, conn, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = rs

你的记录集(Rs)指针没有往下移动,按照你这样的写法,它只会显示第一条记录.至于正确的做法,我想应该是创建一个循环,条件就是判断记录集指针是否已到末尾,到了就跳出,然后刷新Grid控件,这样应该可以吧.
还有就是Grid对象也许不能显露自动化接口。
我是初学者,就知道这么多,希望能够帮到你,早日解决问题..