rs.Open "SELECT distinct * FROM tempdb where year='"&choice&"'", cn, adOpenStatic, adLockOptimistic在VB里面这句就是报错，还望指

Question

你的字段名用year吗？？
试一下这样
rs.Open "SELECT distinct * FROM tempdb where [year]='"&choice&"'", cn, adOpenStatic, adLockOptimistic

Answer 1

'"&choice&"'  可能是少了空格
跟踪调试一下看看，下面的试一下rs.Open "SELECT distinct * FROM tempdb where [year]='" & choice & "'", cn, adOpenStatic, adLockOptimistic

Answer 2

Year是什么类型 ？若是字符型，就这样应该可以
rs.Open "SELECT distinct * FROM tempdb where year='"&choice&"'", cn, adOpenStatic, adLockOptimistic
若是数值型：
rs.Open "SELECT distinct * FROM tempdb where year="& val(choice), cn, adOpenStatic, adLockOptimistic