Foxtable(狐表)用户栏目专家坐堂 → 筛选加载问题


  共有152人关注过本帖树形打印复制链接

主题:筛选加载问题

帅哥哟,离线,有人找我吗?
wlj88868
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:987 威望:0 精华:0 注册:2016/4/27 9:39:00
筛选加载问题  发帖心情 Post By: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
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
chnfo
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2198 积分:18064 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
wlj88868
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:987 威望:0 精华:0 注册:2016/4/27 9:39:00
  发帖心情 Post By:2024/4/22 14:29:00 [只看该作者]

谢谢,


 回到顶部