以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 窗口里父表下有三个子表,判断先后录入顺序 (http://foxtable.com/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 -- 谢谢,蓝老师 |