急！！！！又遇问题了，大侠们救我

Question

Set rs1 = New ADODB.Recordset
If txtSALARYCONF(1).Text <> "" And IsNumeric(txtSALARYCONF(1).Text) = True Then tj = "cjob.SALARY>" & txtSALARYCONF(1).Text
rs1.Open "select * from cjob where " & tj & "", cnn, adOpenDynamic, adLockOptimistic, adCmdText
Debug.Print
Set DataGrid1.DataSource = rs1
以上句子怎么总是说“行集合不能为标签”

Answer 1

出错的语句Set DataGrid1.DataSource = rs1,原因,datagrid1.datasource并不支持所有的记录游标类型,把rs1.Open "select * from cjob where " & tj & "", cnn, adOpenDynamic, adLockOptimistic, adCmdText 改为rs1.Open "select * from cjob where " & tj & "", cnn, 1,3就可以啦,我调试过,这样改后就没问题啦