DataTable.loadfilter - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim ty As WinForm.CheckBox = e.Form.Controls("CheckBox1")
Select Case user.Group
    Case "测试epon","测试router","测试IEswitch","测试switch"
        ty.Enabled = True
        DataTables("软硬件对照表").LoadFilter = "测试组名 = '" & user.group & "'"
        DataTables("软硬件对照表").Load
        Tables("组查询版本_table2").DataTable.loadfilter = "测试组名 = '" & user.group & "'"
        Tables("组查询版本_table2").DataTable.load
    Case Else
        ty.Enabled = False
        DataTables("软硬件对照表").LoadFilter = ""
        DataTables("软硬件对照表").Load
        Tables("组查询版本_table2").DataTable.loadfilter = ""
        Tables("组查询版本_table2").DataTable.load
End Select

主题：DataTable.loadfilter