问了很多人都没有办法,你有办法吗? 小女子谢了

[xiaoran2000]

dim sContactQuery as string
Dim rsContact As ADODB.Recordset
sContactQuery = "SELECT * FROM 结算表 WHERE 用户代号='" & Label8.Caption & "'"
Set rsContact = New ADODB.Recordset
'rsContact.CursorLocation = adUseClient
rsContact.Open sContactQuery, conn, adOpenStatic

Set Datagrid1.DataSource = Nothing
Set Adodc2.Recordset = rsContact
Set Datagrid1.DataSource = rsContact
通过这段代码我想将查询出的记录显示在datagrid上但是系统总提示
Data Type mismatch in criteria expression 请问是什么原因请帮忙给出代码.

[holydiablo]

1、下次问问题不可以不给分的
2、直接设置Set Datagrid1.DataSource = rsContact就可以了
3、你的问题怕是出在你的表定义上吧
这些代码没什么错