如何使Dlookup文本框可写

Question

我正在处理表单并为数据输入和搜索（数据提取）制作了单一表单，但问题是我在一些文本框上使用Dlookup公式以便于数据输入但是当我尝试搜索访问时没有显示该文本框上的数据，并显示该对象只读的错误。 如何获得文本框显示数据以及Dlookup公式？ 请帮助。 很多人

Answer 1

您可以按代码设置文本框值，而不是将DLookup放入文本框的数据源中。

将其放入数据源意味着您无法在运行时编辑文本框，如您所见 但您可以在Form_Open事件中设置一次值，例如：

Private Sub Form_Open(Cancel As Integer)

    Me.TheTextBox = DLookup(...)

End Sub

这将导致文本框在表单打开时自动填充，但文本框是可编辑的，您可以覆盖该值。