Office中国论坛/Access中国论坛

标题: 为啥系统总是提示“类型不匹配”啊 [打印本页]

作者: cybjlt0121 时间: 2012-2-23 10:18
标题: 为啥系统总是提示“类型不匹配”啊
Dim STemp As String
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
a = "Select * From 清单申报表 where 计算机代码 ='" & Me.计算机代码 & "'"
b = "Select * From 清单申报表 where 申报单位 ='" & Me.申报单位 & "'"
STemp = a And b
Rs.Open STemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
上述代码中计算机代码和申报单位都是文本型，为啥系统总是提示“类型不匹配”啊？问题出在哪了，各位大侠帮忙啊，急啊！

作者: 轻风 时间: 2012-2-23 11:06
本帖最后由轻风于 2012-2-23 11:09 编辑

上传示例

作者: cybjlt0121 时间: 2012-2-23 11:24
谢谢了！

作者: roych 时间: 2012-2-23 11:39
代码有问题。应该改为下面这样：

a = "Select * From 清单申报表 where 计算机代码 ='" & Me.计算机代码 & "' and 申报单位 ='" & Me.申报单位 & "'"
STemp = a

复制代码

作者: cybjlt0121 时间: 2012-2-23 12:05
多谢了！问题已解决！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)