所以我有一个令人沮丧的简单问题,但我似乎无法解决。
If Me.Bank_Credit.Value = Null Then
Me.Bank_Credit.Value = 0
End If
基本上,我有一个未绑定的框,用户可以在其中输入数据,然后单击按钮。在确认框上选择“是”后,未绑定框上的数据将复制到绑定框。但是,如果用户不输入任何内容,则会创建一个空的绑定字段,这可能会严重破坏后续查询。
话虽这么说,上面的代码对我来说根本不起作用。例如,如果我设置 If Me.Bank_Credit.Value = 1 然后运行它,那么 1 就会变成 2,正如应该发生的那样。但它只是拒绝为 Null 甚至“”工作。
我确信这个问题有一个简单的解决方案,但我就是想不出来。
提前致谢
没有任何东西等于 Null,甚至另一个 Null 也不等于。没有任何东西不等于 Null,甚至另一个 Null 也不等于。
When Bank_Credit
isNull,下面的表达式将返回Null...不True
正如你所期望的,甚至False
.
Debug.Print (Me.Bank_Credit.Value = Null)
这与立即窗口中出现此结果的原因相同:
Debug.Print Null = Null
Null
Use the IsNull()
功能。
If IsNull(Me.Bank_Credit.Value) Then
另外,看看Nz()
帮助主题看看它是否有用。你可以这样做,尽管这并不是真正的改进IsNull()
. But Nz()
对于其他VBA代码可以非常方便。
Me.Bank_Credit = Nz(Me.Bank_Credit, 0)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)