Select Case e.DataTable.Name Case "DK" Select Case User.Group
Case "制造部" Dim f3 As String = "[类别] <> '胶水' " DataTables("DK").LoadFilter = f3 DataTables("DK").Load() End SelectEnd Select
不可能无效.除非没有进入到这个Case 你调试一下是否进入条件, User.Group到底是什么 加载条件是没问题的