标题：筛选加载问题

1楼

wlj88868 发表于：2024/4/22 13:38:00

Dim txt As String = e.Form.Controls("textBox1").Text
Dim tbl As Table = Tables("开piao资料")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.DataTable.loadFilter = "管辖部门 Like " & txt & " Or 开piao公司 Like " & txt & " Or 入账公司 Like " & txt & "Or 回款金额 Like " & txt & "Or 开piao金额 Like " & txt
    tbl.DataTable.load
End If

当删除到最后一个字符的时候，，数据不会加载回来

此主题相关图片如下：1713764083490.png

此主题相关图片如下：1713764095806.png

2楼

chnfo 发表于：2024/4/22 14:09:00

删除最后一个字符以后，字符数据是空的，当然tbl.filter=""就起作用了，表显示的是所有数据（是指清除之前已经加载的所有数据）

想删除所有数据以后，加载所有数据

If txt = "" Then
tbl.DataTable.loadFilter ＝ ""

tbl.DataTable.load

else

*****

end if

正常情况下，如果是做查询业务，不输入任何关键字，不出数据为好，否则数据量过大时，加载耗时较多

或者直接使用数据表，查询时，用filter，而不是重载数据

[此贴子已经被作者于2024/4/22 14:11:02编辑过]

3楼

wlj88868 发表于：2024/4/22 14:29:00

谢谢，

共3 条记录, 每页显示 10 条, 页签: [1]