记录集中把数据导入datagrid1是没有数据显示 ？？
connection的对象连接显示成功！！
。。。。。
。。。。。。

Dim rr As New ADODB.Recordset
Dim rr As New ADODB.Recordset

Private Sub Command1_Click()
Dim strsql As String

user = txtuser
pwd = txtpwd
strsql = "select * from m123 where name='" & user & "'and id='" & pwd & "'"
rr.Open strsql, conn, adOpenStatic, adLockReadOnly
rr.MoveFirst

Set DataGrid1.DataSource = rr

DataGrid1.Refresh
End Sub


结果是控件 datagrid1没有数据显示 但我的sql语句是没有问题的 因为我用recordcount试过 是有数据的

麻烦各位 高手指教！！！ 初学。