rs.Open "insert into a(价格) values (" & Val(Text1.Text) & ")", cn, 1, 3
这样就可以查询,但改成下面代码就查询不出来,说类型不匹配?
rs.Open "select * from a where 价格='" & Val(Text1.Text) & "'", cn, 1, 3

解决方案 »

  1.   

    rs.Open "select * from a where 价格='" & str(Val(Text1.Text)) & "'", cn, 1, 3
    试试看吧。
      

  2.   

    当然你最好把它设置成float咯。编程的时候保留两位小数就ok了
      

  3.   

    rs.Open "select * from a where 价格=" & cdbl(Text1.Text) & "", cn, 1, 3
      

  4.   

    Leftie(左手,为人民币服务)
    还是类型不匹配
      

  5.   

    字符串就要用字符串来连接:
    rs.Open "select * from a where 价格=" & Text1.Text , cn, 1, 3“类型不匹配”是VB报错还是数据库的错误?