Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共7 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:tbl.Filter

1楼
edisontsui 发表于:2025/3/7 14:55:00

If e.Col.Name = "客户ID" Then '如果编辑的是客户ID列

    If e.Col.DroppedDown Then '如果下拉窗口已经打开

        Dim tbl As Table = Tables("窗口1_Table1")

        If e.Text = "" Then '如果内容为空

            tbl.Filter = "" '显示所有客户

        Else '否则根据输入内容进行模糊筛选

            Dim txt As String = "'%" & e.Text & "%'"

            tbl.Filter = "客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt

        End If

    End If

End If


老师你好。上面红色那个位置,我希望改成:如果内容为空值,则不显示这行。请问代码要怎样修改?谢谢。


2楼
有点蓝 发表于:2025/3/7 15:14:00
tbl.Filter = "客户ID is not null" 
3楼
edisontsui 发表于:2025/3/7 17:16:00
我以前用过 is not null 这个用法,好像是没有效果的。
4楼
有点蓝 发表于:2025/3/7 17:24:00
【不显示这行】指什么?指哪个表的行?只是一行不显示?还是所有客户为空的行?截图说明
5楼
edisontsui 发表于:2025/3/8 7:28:00
所有客户为空的行都不要显示。
6楼
有点蓝 发表于:2025/3/8 9:20:00
那么2楼的用法没有问题。可能有其它代码影响了,比如又触发了其它筛选
7楼
edisontsui 发表于:2025/3/8 11:02:00
好的
共7 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01563 s, 2 queries.