access 代码提示 运行时错误‘13’类型不匹配
DimdbAsDAO.DatabaseDimrsAsDAO.RecordsetDimSqlAsStringSetdb=CurrentDb()Sql="SelectRigh...
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim Sql As String
Set db = CurrentDb()
Sql = "Select Right([ZFBH],3) AS XXH,Left([ZFBH],InStrRev([ZFBH]," - ")) AS DM From ZFB where DM = '" & Forms!HTZF!DM & "'"
上面的代码在运行时提示 “运行时错误 ‘13’ 类型不匹配”， Sql = "Select Right([ZFBH],3) AS XXH,Left([ZFBH],InStrRev([ZFBH]," - ")) AS DM From ZFB where DM = '" & Forms!HTZF!DM & "'" 显示黄色 。请高手帮我看看错在哪里，该怎么修改，谢谢！ 展开
Dim rs As DAO.Recordset
Dim Sql As String
Set db = CurrentDb()
Sql = "Select Right([ZFBH],3) AS XXH,Left([ZFBH],InStrRev([ZFBH]," - ")) AS DM From ZFB where DM = '" & Forms!HTZF!DM & "'"
上面的代码在运行时提示 “运行时错误 ‘13’ 类型不匹配”， Sql = "Select Right([ZFBH],3) AS XXH,Left([ZFBH],InStrRev([ZFBH]," - ")) AS DM From ZFB where DM = '" & Forms!HTZF!DM & "'" 显示黄色 。请高手帮我看看错在哪里，该怎么修改，谢谢！ 展开
1个回答
展开全部
Left([ZFBH],InStrRev([ZFBH]," - ")) AS DM
双引号跟前面的冲突了，改成单引号
双引号跟前面的冲突了，改成单引号
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
