string - 在其 On Change 事件处理程序中检索控件的新内容

Question

Public Function EditUpdate()
Dim rstEditAddress As DAO.Recordset
Dim Svalue, EditedAddressLine1 As Variant

Svalue = Me.lstBoxCompanyName.Value

EditAddressValue = "SELECT * FROM Companies WHERE CompanyID =  " & Svalue
Set rstEditAddress = CurrentDb.OpenRecordset(EditAddressValue)

EditedAddressLine1 = Me.txtbxAddressLine1.Value

With rstEditAddress
 .Edit
    .Fields("AddressLine1") = EditedAddressLine1
    .Fields("AddressLine2") = NewAddressLine2
    .Fields("AddressLine3") = NewAddressLine3
    .Fields("Town") = NewTown
 .Update
End With

End Function

我有一个名为 txtbxAddressLine1 的文本框。使用 Access 中的 On Change 事件，该事件调用此函数，并且应该执行使用“已编辑”数据更新表中的记录的过程。然而 EditedAddressLine1 中的值似乎永远不会改变!它始终具有表中最初的值。

对于为什么会发生这种情况有什么建议吗？

Answer 1

在控件的 Change 事件处理程序中，读取其 Text 而不是 Value 属性来获取新数据:

EditedAddressLine1 = Me.txtbxAddressLine1.Text