主题：双表条件筛选，感谢BIN老师甜老师指点，代码不报错了，但筛选不出来。

他应该是将Bin说的Sql命令窗口  和狐表的命令窗口搞混了，所以跳这个错误

甜老师，点击筛选，也没有报错。第三楼是我加了个LoadFIlter 弹出的窗口。

求甜老师帮我看看项目，上面的项目我怕你们打不开，已经转换为 内部数据源了。

顶

主要就是这里麻烦----timepicker1、2筛选的是表B的时间。意思就是筛选出符合条件的时间范围内的专合社，然后表A就不加载这些符合条件的专合社。只加载别的。

Dim Filter As String = "1=1"

With e.Form.Controls("DateTimePicker1")

If .Value IsNot Nothing Then
        Filter = Filter & " and 第六列 >= #" & .Value & "#"
    End If
End With
With e.Form.Controls("DateTimePicker2")
    If .Value IsNot Nothing Then
        Filter = Filter & " and 第六列 <= #" & .Value & "#"
    End If
End With
With e.Form.Controls("combobox1")
    If .Value IsNot Nothing Then
        Filter = " and 第2列 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("combobox2")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & " and 第1列 = '" & .Value & "'"
    End If
End With

DataTables("表A").LoadFilter = "第4列 not in (select iif(第七列 is null, '', 第七列) from {表B} where " & filter & ")"

DataTables("表A").Load
output.show(DataTables("表A").LoadFilter)

非常感谢甜老师，今天没有登录，窗口显示关键字 'is' 附近有语法错误。

 如果是sqlserver数据库，这样改

 

DataTables("表A").LoadFilter = "第4列 not in (select isnull(第七列, '') from {表B} where " & filter & ")"

是SQL的，因为以后要在局域网上运行。刚才甜老师您提供的解决方案，窗口报关键字 'and' 附近有语法错误。

Dim Filter As String = "1=1"

With e.Form.Controls("DateTimePicker1")

If .Value IsNot Nothing Then
        Filter = Filter & " and 第六列 >= #" & .Value & "#"
    End If
End With
With e.Form.Controls("DateTimePicker2")
    If .Value IsNot Nothing Then
        Filter = Filter & " and 第六列 <= #" & .Value & "#"
    End If
End With
With e.Form.Controls("combobox1")
    If .Value IsNot Nothing Then
        Filter = " and 第2列 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("combobox2")
    If .Value IsNot Nothing Then
        Filter = Filter & " and 第1列 = '" & .Value & "'"
    End If
End With

DataTables("表A").LoadFilter = "第4列 not in (select isnull(第七列, '') from {表B} where " & filter & ")"

DataTables("表A").Load