Ms access 如何使Dlookup文本框可写

Ms access 如何使Dlookup文本框可写,ms-access,vba,Ms Access,Vba,我正在处理表单,并制作了一个用于数据输入和搜索(数据提取)的表单,但问题是我在一些文本框上使用了Dlookup公式,以便于数据输入,但当我尝试搜索时,access不会在该文本框上显示数据,并显示对象为只读的错误。 如何获得文本框显示数据以及Dlookup公式? 请帮忙。 您可以通过代码设置文本框值,而不是将DLookup放入文本框的数据源中 将其放入数据源意味着您无法在运行时编辑文本框,正如您所经历的那样。 但您可以在表单_Open事件中设置一次该值,例如: Private Sub Form_O

我正在处理表单,并制作了一个用于数据输入和搜索(数据提取)的表单,但问题是我在一些文本框上使用了Dlookup公式,以便于数据输入,但当我尝试搜索时,access不会在该文本框上显示数据,并显示对象为只读的错误。 如何获得文本框显示数据以及Dlookup公式? 请帮忙。
您可以通过代码设置文本框值,而不是将
DLookup
放入文本框的数据源中

将其放入数据源意味着您无法在运行时编辑文本框,正如您所经历的那样。
但您可以在
表单_Open
事件中设置一次该值,例如:

Private Sub Form_Open(Cancel As Integer)

    Me.TheTextBox = DLookup(...)

End Sub

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

为什么不将其更改为组合框?谢谢您的回复。实际上,我有一个表单,上面有一个保存和搜索按钮,我想知道,如果用户倾向于添加记录,那么由于dlookup,一些文本框会自动填充,当用户想要搜索时,文本框也会显示数据库中的记录。