Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")If e.Node.Name = "全部" ThenTables("物资字典Filter = ""ElseTables("物资字典").Filter = "物资编码 Like '" & e.Node.Name & "%'"End If
因为数据量大,已设置为分页加载,如何改写为在datatable后台筛选,便于筛选所有数据,直接吧tables改为datatables会出错