标准表达式中数据类型不匹配问题

五十不学艺　发表于：2011-10-16 00:07:53 　

CurrentDb.QueryDefs("综合查询1").sql = strSQl
Me.筛选结果.Form.RecordSource = "综合查询1"
提示：标准表达式中数据类型不匹配

返回打开查询＂综合查询1＂也是同样提示．

五十不学艺发表于：2011-10-16 00:20:50

    If Me.sfYE.ItemsSelected.Count > 0 Then
        Set ctl = Me.sfYE
        strWhere = ""
        For Each varI In ctl.ItemsSelected
            strWhere = strWhere & "'" & ctl.Column(0, varI) & "',"
        Next
        strSQl = strSQl & " And sfYE in (" & strWhere & ") "
    End If
是不是我标黄线这名有问题呢？

Top

叶海峰发表于：2011-10-17 13:25:26

试试

If Me.sfYE.ItemsSelected.Count > 0 Then
        Set ctl = Me.sfYE
        strWhere = ""
        For Each varI In ctl.ItemsSelected
            strWhere = strWhere & "'" & ctl.Column(0, varI) & "',"
        Next

        strWhere =left(strWhere ,len(strWhere )-1)'去掉最后一个多余的","号
        strSQl = strSQl & " And sfYE in (" & strWhere & ") "
    End If

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

标准表达式中数据类型不匹配问题