主题：[求助] 验证按钮代码（已解决）

一段代码，要求在"无账号"列有√的行，"大帐存款"列必须填入数据，并提示"OK"，否则提示"是否遗漏"，现在的情况是，填入0时，提示"是否遗漏"，要求在填入0的情况下，提示能显示"OK",代码应该如何修改，请各位老师指教，谢谢！！

 

 

For Each dr As DataRow In DataTables("存款明细").DataRows 
    If  dr("无账号") = "√" And dr("大帐存款") = Nothing Then
        MessageBox.Show("请检查无账号的大帐存款是否漏填","提示")
        Return
    End If

Next

MessageBox.Show("OK","提示")

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目4.table

谢谢程老师的回复，因为"无账号"列的√是从其他表引用过来的，这只是一个案例，在这张表还有其他的操作，只是想在保存前对一系列操作进行验证，此案例只是其中的一项操作内容，是否有办法达到上述目的，还请各位老师指教，谢谢！！

谢谢程老师的指教，此表大概也就2万行的数据，现在的问题是"大帐存款"列填入0时，提示"是否遗漏"，但是实际要求是允许填入0，提示显示"OK"（因为0值不为空值），如何来实现这个效果，请各位老师指教，谢谢！！

谢谢程老师，代码达到预期效果，再次衷心感谢！！