以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  字段  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98224)
--  作者：280184850
--  发布时间：2017/3/26 18:25:00
--  字段
窗口中，缴费方式列中判断是否输入油卡字段，如果输入油卡字段，油卡种类列和油卡卡号列必填，如果不是，油卡种类列和油卡卡号列不能填。怎么写代码？老师们帮帮忙
--  作者：有点色
--  发布时间：2017/3/27 0:14:00
--  

Dim r As Row = Tables("表A").Current

If r("缴费方式") = "油卡" Then

    If r.IsNull("油卡种类") Then

        msgbox("油卡种类必填")

        Return

    End If

    If r.IsNull("油卡卡号") Then

        msgbox("油卡卡号必填")

        Return

    End If

End If