问几个关于数据库操作的问题..

Question

我在工程里放了一个MSHFlexGrid的控件..将数据栽入到MSHFlexGrid里..
我是用access数据库的.明明有7千多条数据..怎么载入后就剩下780多条了?还是VB在这方面做了限制..  还有一个查询的问题,比如我要查询数据库某段的用户名称,如果有的话,将他的密码弹出来.我数据表的格式是这样id UserName PassWord下面是我写的代码,查询是可以了`不知道要怎么将密码弹出来
If Conn.Execute("select count(*) from user where username='" & Text1.Text & "'")(0) > 0 Then
'弹出找的用户密码
End If

Answer 1

1 你是如何查询和载入的？2 这样：
Dim rs As ADODB.Recordset
Set rs = Conn.Execute("select * from user where username='" & Text1.Text & "'")
If Not rs.EOF Then MsgBox "The Password of " & rs!UserName & " is " & rs!PassWord

Answer 2

我载入是这样的Conn.Open "DBQ=" & App.Path & "\dat.mdb" & ";Driver={Microsoft Access Driver (*.mdb)};"
Set Grid1.DataSource = Conn.Execute("select id,username as 用户名,PassWord as 用户密码,format(endtime,'YYYY-mm-dd') as [注册时间],format( cardtime,'yyyy-mm-dd') as [账户有效期] from user")