主题：求助关于日期问题

With wb.AddInputGroup("form1","ipg1","销售查询")
    .AddSelect("lc","楼层:","全部|负一层|一层|二层|三层|四层")
    With .AddInput("ksrq","开始日期:","date")
        .Value = Format(Date.Today,"yyyy-MM-dd")
       ' .Min = (Date.Today.AddYears(-1)
    End With
    .AddInput("jsrq","结束日期:","date").Value = Format(Date.Today,"yyyy-MM-dd")
End With

如何让开始日期的最小值不能=结束日期减一年？？  谢谢了