网络版应该中，下面的代码能保证是全部的数据吗？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 网络版应该中，下面的代码能保证是全部的数据吗？

共有1584人关注过本帖树形打印复制链接主题：网络版应该中，下面的代码能保证是全部的数据吗？

xxfoxtable

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1709 积分：15988 威望：0 精华：0 注册：2017/6/1 23:12:00

网络版应该中，下面的代码能保证是全部的数据吗？ 发帖心情

Post By：2017/11/21 23:12:00 [只看该作者]

网络版应该中，下面的代码能保证是全部的数据吗？如果不能保证，怎么事先加载一下？

Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then '如果下拉窗口已经打开
    Dim tbl As Table = Tables("纳税人明细_Table1")
    If drp.Text = "" Then '如果内容为空
        tbl.Filter = "" '显示所有客户
    Else '否则根据输入内容进行模糊筛选
        Dim txt As String = "'%" & drp.Text & "%'"
        tbl.Filter = "纳税人识号 Like " & txt
    End If
End If

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107440 积分：546479 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/11/21 23:31:00 [只看该作者]

如果之前没有加载数据的，这个筛选就不起作用的。动态加载可以这样

Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then '如果下拉窗口已经打开
    Dim tbl As DataTable = Tables("纳税人明细_Table1").datatable
    If drp.Text = "" Then '如果内容为空
        tbl.loadFilter = "" '显示所有客户
    Else '否则根据输入内容进行模糊筛选
        Dim txt As String = "'%" & drp.Text & "%'"
        tbl.loadFilter = "纳税人识号 Like " & txt
    End If

tbl.load
End If

下一主题 >> << 上一主题

主题：网络版应该中，下面的代码能保证是全部的数据吗？