以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  查询窗口  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53515)

--  作者:狂风暴雨狂波
--  发布时间:2014/7/9 16:34:00
--  查询窗口

If Filter > "" Then
    Tables(
"订单").Filter = Filter
End If

如果没有符合条件的数据,则提示“没有查找的数据”,该如何写代码?请高手赐教!


--  作者:Bin
--  发布时间:2014/7/9 16:36:00
--  
if Tables("订单").rows.count =0 then
  messagebox.show("美数据")
end if