求助模糊查询提示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求助模糊查询提示

共有2789人关注过本帖树形打印复制链接主题：求助模糊查询提示

long086

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

加好友

发短信

等级：童狐帖子：298 积分：2605 威望：0 精华：0 注册：2013/5/22 7:16:00

求助模糊查询提示 发帖心情

Post By：2020/4/13 23:29:00 [只看该作者]

设置了一个模糊查询功能，用下面的代码可以实现功能，但是如果没有查询到内容就是不显示，想实现如果没有数据给个弹窗提示 “没有查询到数据”，代码应该怎么改

       If cx.Value Is Nothing Then
            MessageBox.Show("请输入查询内容!")
            Return
        Else
            filter = "用户名称 like '%" & cx.text & "%'"
        End If

程兴刚

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

加好友

发短信

等级：超级版主帖子：7258 积分：40773 威望：0 精华：16 注册：2008/8/31 23:23:00

Post By：2020/4/14 0:04:00 [只看该作者]

If cx.Value Is Nothing Then

MessageBox.Show("请输入查询内容!")

Return

Else

filter = "用户名称 like '%" & cx.text & "%'"

End If

Tables("表A").Filter = filter

If Tables("表A").Rows.Count < 1

MessageBox.show("筛选数据成功,没有筛选到符合条件的行!","系统提示")

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

主题：求助 模糊查询提示

主题：求助模糊查询提示