以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  窗口里父表下有三个子表，判断先后录入顺序  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177850)

--  作者：xuzihang --  发布时间：2022/6/7 12:00:00 --  窗口里父表下有三个子表，判断先后录入顺序 窗口里父表下有三个子表，判断先后录入顺序，先录入成交  服务 后录入售后 问题：如果要录入服务，判断销售是否录入，录入了才能否则不让，老师，这个不会判断了，请教？  If Tables("服务总").Current.Locked = False Then             If  DataTables("服务成交").DataCols("编号").Rows.Count <0 Then                   \' Tables("服务总.服务成交").Rows.Count <0 Then                 \'Tables("服务总.服务成交").current.IsNull("服务项目_数量") = False Then                 MessageBox.show("请先增销售成交!")             Else                 If Tables("服务总.服务明细").Rows.Count >0 Then                     If  Tables("服务总.服务明细").current.isnull("项目") Then                          msgbox("填写项目")                     ElseIf  Tables("服务总.服务明细").current.isnull("单位") Then                         msgbox("填写单位")                     ElseIf  Tables("服务总.服务明细").current.isnull("数量") Then                         msgbox("填写数量")                     ElseIf  Tables("服务总.服务明细").current.isnull("服务人员") Then                         msgbox("填写服务人员")                         Return                     Else                         Tables("服务总.服务明细").Addnew()                     End If                 Else                     Tables("服务总.服务明细").Addnew()                 End If             End If         Else             MessageBox.show("完成后的单子不能增加了,先新建订单,在增销售成交后增服务!")         End If

--  作者：有点蓝 --  发布时间：2022/6/7 13:33:00 --   If  DataTables("服务成交").DataRows.Count =0 Then

--  作者：xuzihang --  发布时间：2022/6/7 13:49:00 --   谢谢，蓝老师