vb 一个小问题 - VB / 基础类

我用vb编程，其中一个combox控件的dataformat 设为日期，如2010-7-1，数据库中有个字段为日期型，也如2010-7-1，我想实现在combox选中一个日期之后，执行语句：
Adodc1.RecordSource = "select * from 销量目标 where 时间='Combo1.Text'"
Adodc1.Refresh
提示错误：标准表达式中数据类型不匹配
我想是combox 和access数据库中的字段的日期类型有问题，不知道具体什么问题，如何解决，请写出解决代码。谢谢！！！！！！！！！！！！！！！！！！！！！！

---

Adodc1.RecordSource = "select * from 销量目标 where 时间='" & Combo1.Text & "'"

---

数据库为SQL：
Adodc1.RecordSource = "select * from 销量目标 where 时间='"& Combo1.Text &"'"
数据库为ACCESS：
Adodc1.RecordSource = "select * from 销量目标 where 时间=#"& Combo1.Text &"#"

---

Adodc1.RecordSource = "select * from 销量目标 where 时间=#" & Combo1.Text & "#"
Adodc1.Refresh

---

Sql语句有误，字符串连接错误
VB code:
Adodc1.RecordSource = "select * from 销量目标 where 时间[color=#FF0000]='Combo1.Text'"[/color][b][/b]Adodc1.Refresh

改为
VB code:
Adodc1.RecordSource = "select * from 销量目标 where 时间=#" & Combo1.Text