set DataGrid1.DataSource = rs DataGrid1为什么时空的?
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
txtSQL = "select * from 采样点基本情况"
Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集,
MsgBox rs.RecordCount
' rs.Open "select * from 采样点基本情况", cn, adOpenKeyset, adLockBatchOptimistic '连接
Set DataGrid1.DataSource = rs
注:Set rs = ExecuteSQL(txtSQL, Msgtext)' 这个函数得到一个记录集,验证也是成功的,rs不为空,为什么DataGrid1显示时空的?