主题：[求助]同一数据表的2个窗口控件副本表同时按不同条件加载的问题

Dim LoadFilter1 As String

With e.Form.Controls ("StartDate")

    If .Value IsNot Nothing Then

        If  LoadFilter1  >"" Then

             LoadFilter1  =  LoadFilter1  & " And "

        End If

         LoadFilter1  =  LoadFilter1  & "领料日期 >= '" & .Value & "'"

    End If

End With

With e.Form.Controls ("EndDate")

    If .Value IsNot Nothing Then

        If  LoadFilter1  >"" Then

             LoadFilter1  =  LoadFilter1  & " And "

        End If

         LoadFilter1  =  LoadFilter1  & "领料日期 <= '" & .Value & "'"

    End If

End With

 

If  LoadFilter1  > "" Then

    Tables("装卸车费管理_Table8").DataTable.LoadFilter = LoadFilter1

 

End If

Tables("装卸车费管理_Table8").Sort = "领料日期"

 

Dim LoadFilter2 As String

With e.Form.Controls ("StartDate")

    If .Value IsNot Nothing Then

        If  LoadFilter2  >"" Then

             LoadFilter2  =  LoadFilter2  & " And "

        End If

         LoadFilter2  =  LoadFilter2  & "收纱日期 >= '" & .Value & "'"

    End If

End With

With e.Form.Controls ("EndDate")

    If .Value IsNot Nothing Then

        If  LoadFilter2  >"" Then

             LoadFilter2  =  LoadFilter2  & " And "

        End If

         LoadFilter2  =  LoadFilter2  & "收纱日期 <= '" & .Value & "'"

    End If

End With

 

 

If  LoadFilter2  > "" Then

   Tables("装卸车费管理_Table11").DataTable.LoadFilter = LoadFilter2

 

End If

 

哪位老师帮忙看看，为什么第一个副本按 领料日期 加载的被第二个副本加载的给覆盖了，要怎样修改才能让两个副本分别按条件加载？