以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 搜索问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=180980) |
-- 作者:15666282205 -- 发布时间:2022/10/21 8:40:00 -- 搜索问题 老师,我在textbox的textchanged事件中设置了以下搜索代码,想实现如下功能:如果搜不到内容则执行其他代码,判断搜索结果的代码我不会,请指教。 Dim s As String = e.sender.Text Tables("金工工时表").filter = "convert(零件序号,\'System.String\') like \'%" & s & "%\'" |
-- 作者:有点蓝 -- 发布时间:2022/10/21 8:43:00 -- Dim s As String = e.sender.Text Tables("金工工时表").filter = "convert(零件序号,\'System.String\') like \'%" & s & "%\'" if Tables("金工工时表").rows.count = 0 then msgbox("没有符合条件的数据") end if
|
-- 作者:15666282205 -- 发布时间:2022/10/22 9:53:00 -- 完美解决,谢谢! |