Dim r As Row = Tables("表A").Current
If r("某列") = "值1" OrElse r("某列") = "值2" Then ElseIf r("某列") = "差分阻抗" OrElse r("某列") = "差模阻抗" Then If r.IsNull("蚀刻线间距") Then msgbox("不能为空") Return End If If r.IsNull("成品线间距") Then msgbox("不能为空") Return End IfEnd If
r.save