为何报错

wsxwsx1

Dim RSC As adodb.Recordset
Set RSC = New adodb.Recordset
Dim Z_memo As String
STRSQL = "SELECT F_XYdaiMa,F_XYXingMing,F_ZhuiZhaoKaoSiChengJiHeGeSiJian FROM [Q0F0041-学员就读期限监控] "
STRSQL = STRSQL & " WHERE DATEADD('M'," & Z_QiXian & ",F_ZhuiZhaoKaoSiChengJiHeGeSiJian) <= Date "
RSC.Open STRSQL, Zquan_odbc, adOpenStatic, adLockReadOnly


==================
为何在此处语句出错：
DATEADD('M'," & Z_QiXian & ",F_ZhuiZhaoKaoSiChengJiHeGeSiJian) <= Date
说参数有问题?

wsxwsx1

RSC.Open STRSQL, Zquan_odbc, adOpenStatic, adLockReadOnly
在执行上面语句时，报错“参数”