以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  窗口表空值判断，表没数据就不执行，并提示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142142)

--  作者：yifan3429 --  发布时间：2019/10/19 17:05:00 --  窗口表空值判断，表没数据就不执行，并提示 If e.Form.Controls("Table8") Is Nothing Then \'如果Current为Nothing?     MessageBox.Show("没有数据,请加载后再操作!","小艺提示")     Return \'则返回 End If If Forms(e.Sender.Text).TableName <> "" Then \'不是模式,独立窗口     Forms(e.Sender.Text).show     MainTable = Tables(Forms(e.Sender.Text).TableName) Else     Forms(e.Sender.Text).show     \'Else     \'msgbox( e.Sender.text & "  正在测试 中尚未开放") End If [此贴子已经被作者于2019/10/19 17:07:49编辑过]

--  作者：有点蓝 --  发布时间：2019/10/19 17:10:00 --   If e.Form.Controls("Table8").table.rows.count = 0 Then