以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  空值动态提示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=142181)

--  作者：有点蓝 --  发布时间：2019/10/20 21:05:00 --   例如 Dim str() As String = {"第一列","第二列"} For Each c As String In str     If dr.isnull(c) Then         msgbox(c & "不能为空")         e.cancel = True exit for     End If Next