你这段代码应该写在万能窗口,在万能检测是否输入了值,决定是否触发操作
If Date1 IsNot Nothing And Date2 IsNot Nothing DataTables("采购付款表").LoadFilter = "进仓日期 >= '" & DATE1 & "' AND 进仓日期 <= '" & DATE2 & "'" DataTables("采购付款表").Load Else MessageBox.Show("您未在万能窗口1输入起始日期或未在万能窗口2输入结束日期!") Return Nothing End If