无法确定文本框是否为空

Question

这应该是一个简单的，我已经做了半小时的论坛阅读，但由于某种原因，我错过了一些东西。我想使用VBA来查看文本框是否为空。我使用Me.TxtBox.Value = Nothing确保文本框为空。

到目前为止，这是我尝试过的以及我得到的错误消息：

---

IsNull(Me.TxtBox.Value)返回：False

---

IsNull(Me.TxtBox)返回：False

---

Len(Me.TxtBox.Value & vbNullString)返回：Run-time error '91': Object variable or With block variable not set

---

整个表格是无限制的，但我认为这不重要。

Answer 1

您需要测试该框是否为真（空）或仅包含零长度字符串： -

if len(trim(me.txtbox.value & vbnullstring)) = 0 then 
' it's empty
else
' it's not empty
end if

您也可以使用“”代替vbnullstring。

Answer 2

使文本框为空：

Me.TxtBox = Null

确定文本框是否为空：

IsNull(Me.TxtBox)

Answer 3

我发现了问题的来源。问题是由Me.TxtBox.Value = Nothing设置引起的。当我想清除值时，如果我使用Me.TxtBox.Value = vbNullString，那么我可以检查长度是否为零。

谢谢大家的帮助。我想将来我会Me.TxtBox = Null。这似乎是最简单的解决方案。