主题：sql语句之add_months函数问题

我想根据某时间字段在当前系统时间与前一个月之间来查询表格，输入以下的删选条件：

WHERE 合同清单.合同录入时间 > add_months(sysdate,-1);

报错：

此主题相关图片如下：无标题.png

请问应如何修改？

Dim dt As Date = Date.Today.AddMonth(-1)

Dim str as string = "Select * From {订单} Where 日期 >#" & dt & "#"

建议先系统学习帮助，再做系统。