主题：[求助]如何加载未加裁的数据？

我设置了加载条件，有时想加载过滤掉的数据，如何动态加载啊？不会是把项目管理里的代码删了重启吧，

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:汽车管理系统.table

可以在窗口做按钮进行重新加载，如：

DataTables("总表").LoadFilter = "True"
DataTables("总表").Load()

加载上个月以来所有数据及所有没通过运费结算_结清审核的数据如何定义条件啊？

用LoadFilter设置条件即可啊。

问题是多条件，不知道如何合并
If e.DataTableName = "总表" Then
    e.Filter = "[运费结算_结清] = false"
End If
If e.DataTableName = "总表"   Then
    Dim StartDate As Date = Date.Today().Addmonths(-1)
    e.Filter = "[卸车_日期] > #" & StartDate & "# "
End If
条件是所有未结清的记录及上个月以来的所有数据，我还没做好LOAD按钮，试验有点麻烦，唉，还是求教吧。

If e.DataTableName = "总表"   Then
    Dim StartDate As Date = Date.Today().Addmonths(-1)
    e.Filter = "[运费结算_结清] = false and [卸车_日期] > #" & StartDate & "# "
    e.DataTable.Load()
End If

报错e.DataTable.Load()
而且只加载上月以来的，而之前所有没结清的数据都没有加载，用and合并不对？

按钮代码我想应该是这样吧。

Dim today As Date = Date.Today()
Dim StartDate AS date = New Date(today.Year, today.Addmonths(-1).Month, 1)
DataTables("总表").LoadFilter = "[运费结算_结清] = false or [装车_日期] >= #" & StartDate & "#"
DataTables("总表").Load()

If e.DataTableName = "总表"   Then
    Dim StartDate As Date = Date.Today().Addmonths(-1)
    e.Filter = "[运费结算_结清] = false or [卸车_日期] > #" & StartDate & "# "
End If

Date.Today().Addmonths(-1)
这样不严谨的，假设今天是10号，那么它只能加载上月10号以后和未结清的数据，而不能加载上月整个月的数据.