以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  删除问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=142212)

--  作者：outcat --  发布时间：2019/10/21 13:51:00 --  删除问题 If Tables("商品类别表").Current IsNot Nothing Then     If Tables("商品明细表").Current("商品类别") IsNot Nothing Then         MessageBox.Show("该商品类别下已录入商品明细,不可删除","提示")         Return     Else         Tables("商品类别表").Current.Delete         DataTables("商品类别表").save     End If End If    老师麻烦看一下，我想实现 删除  商品类别表 时，判断该类别下是否有商品明细，当该类别下有商品明细时提示都对，但当选择该类别下没有商品明细时，代码执行不了，请看一下。

--  作者：有点蓝 --  发布时间：2019/10/21 15:11:00 --   If Tables("商品类别表").Current IsNot Nothing Then     If Tables("商品明细表").compute("count(商品类别)","商品类别=\'" & Tables("商品类别表").Current ("商品类别") & "\'") > 0 Then         MessageBox.Show("该商品类别下已录入商品明细,不可删除","提示")         Return     Else