以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  字段  (http://foxtable.net/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