表单中文本框为空时无法更改背景色的问题求助

问题根源 #

绑定的price是数值型字段，但文本框显示为字符串格式。当文本框为空时，可能存在两种状态：字段值为Null，或文本框被手动清空为空白字符串（""），这导致你之前的条件格式和VBA代码无法覆盖所有情况。

条件格式解决方案 #

选择文本框的条件格式，设置表达式是，输入以下判断规则：

IsNull([price]) Or Trim(Nz([price],"")) = ""

这个规则会同时捕捉字段为Null，以及文本框被清空为空白（含空格）的情况。

VBA代码解决方案 #

在文本框的AfterUpdate和OnChange事件中添加以下代码，确保实时更新背景色：

Me.price.BackColor = IIf(IsNull(Me.price.Value) Or Trim(Me.price.Value & "") = "", vbRed, vbWhite)

代码说明 #

• Me.price.Value & ""：将Null值转换为空白字符串，统一判断逻辑
• Trim(...)：排除文本框内仅输入空格的情况
• 满足空值/空白条件时背景设为红色，否则设为白色

内容的提问来源于stack exchange，提问作者Nir4s