在线等，超急!!!--关于显示MSGBOX的问题
小妹妹我做了一个关于合同管理的系统，我希望在查询时，如果该合同的终止日期大于当天的日期，能够自动提示“合同已过期”，如果小于当天的日期，则无须任何提示。
注：查询时是通过对方公司名称来进行查询的

请问我该怎么做才能实现啊？



------解决方案--------------------
if 合同的终止日期> date() or datediff( 'd ',合同的终止日期,date())> 0) then
合同已过期
endif
------解决方案--------------------
该合同的终止日期大于当天的日期，能够自动提示“合同已过期”，如果小于当天的日期，则无须任何提示。

---------------------------------------

大于当天日期，提示“合同已过期”，你搞反了吧?


if 合同的终止日期 <date() then
MsgBox "合同已过期 "
endif