1

这是我之前询问的关于如何在输入时更新文本框的问题的后续。在我之前的问题中，我有三个文本框，其中两个已启用，一个未启用。它们看起来像这样：

三个文本框图像

我的目标是使用两个文本框的名字和姓氏在另一个文本框中填写“个人代码”。当我输入名字和姓氏时，我希望 Code Personal 文本框立即更新，格式为LLLLLL_F（例如：BERNAS_P）。但是，每当我尝试更新 Code Personal 文本框时，都会收到此错误：

错误图片

我用来创建代码个人格式和更新文本框的代码是：

Private Sub TxtFName_Change()

firstName = Me.TxtFName.Value
lastName = Me.txtLName.Value
firstPart = Left(lastName, 6)
secondPart = Left(firstName, 1)

nameCode = firstPart + "_" + secondPart
upperNameCode = UCase(nameCode)

txtCodePersonal.Text = upperNameCode 'My debug tells me I have an error here
End Sub

我尝试通过: 将焦点设置到txtCodePersonal文本框[txtCodePersonal].SetFocus，但仍然收到错误消息（MS Access 无法将焦点移到控件txtCodePersonal。）

关于在输入其他两个文本框时如何更新“个人代码”文本框的任何想法？

提前感谢您的所有帮助。

4

1 回答 1

2

.Value对文本框的属性而不是其属性进行赋值.Text。这些中的任何一个都应该起作用：

Me.txtCodePersonal.Value = upperNameCode
Me.txtCodePersonal = upperNameCode

.Value是文本框的默认属性，因此您不需要显式包含它。如果您觉得它使代码更清晰，请包含它。

于 2012-11-18T14:07:36.853 回答