datagrid 控件的问题都快郁闷死了

[donghongbing]

Dim rs As New ADODB.Recordset
Set rs = New ADODB.Recordset
If rs.State <> adStateClosed Then rs.Close
rs.Open "select * from LXLF", MdbConn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rs
为什么数据显示不出来呢

[Silo]

用ADO控件呢？

[donghongbing]

谢谢各位了 我都试过了不行 最后我只好换MSHFlexGrid用了

[faysky2]

设置客户端游标后再试试

Dim rs As New ADODB.Recordset
Set rs = New ADODB.Recordset
rs.CursorLocation=adUseClient '设置客户端游标
If ......

如果还不行，换一个DataGrid再试试