原来用的是 Data2.RecordSource = "SELECT * From List WHERE (list.date = date())"
Data2.Refresh
没有问题，错误没有.
x现在换成
Data2.RecordSource = "SELECT * From List WHERE (list.date = date() )and (list.typeno= model1$)"
Data2.Refresh

出现错误
实时错误“3061”
参数不足，期待是1。

不知道为什么
达人指点哟。
谢谢

Data2.RecordSource = "SELECT * From List WHERE (list.date = date() ) and (list.typeno= model1$)"
AND前应该有空格吧

我想问题出在(list.typeno= model1$)之中。