主题：查询数据的代码问题！！

With e.Form.Controls("DateTimePicker2")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "日期 <= '" & .Value & "'"
    End If
End With
If Filter > "" Then
    Tables("订单").DataTable.LoadFilter = Filter
    Tables("订单").DataTable.Load
End If

这个查询代码，可以在不加载数据的情况下查询吗？不如我设置初始不加载任何数据，直接通过查询窗口可以查询吗？