ms-access - 如何设置文本框以启用事件

Question

我在访问表单上有一个文本框，如果文本框为空白，我想启用该文本​​框进行编辑。我是 VBA 新手，不确定最好的方法。使用双击事件对我来说很好，但我更愿意在加载时进行。

我已经尝试了以下代码，但似乎无法使其正常工作。任何帮助，将不胜感激。

Private Sub EmpID_DblClick(Cancel As Integer)
If EmpID.Text = "" Then
    Me.EmpID.Enabled = True
End If
End Sub

Answer 1

对于应该在每条记录的基础上发生的事情，您最好使用当前事件。不要将 .Text 属性用于控件。如果必须使用属性，请使用 .Value。.Text 属性仅在控件具有焦点时可用，并且通常仅用于特殊情况，例如 Change 事件。

Private Sub Form_Current()
  If IsNull(EmpID) Then
    Me.EmpID.Enabled = True
  End If
End Sub

在正常设置中，控件不可能等于零长度字符串 ("")

您可以通过以下方式涵盖所有基础：

Trim(EmpID & "") = ""

Answer 2

您遇到了 Null 问题

Null不一样""

试试这个

If EmpID.Text Is Null Then
    Me.EmpID.Enabled = True
End If