如何替换Access 2007中文本框的文本值

时间:2011-07-14 13:48:07

标签: ms-access ms-access-2007

我在访问2007中有某种形式的文本框。 我试图用一些VBA替换文本框文本中的所有点(。)。

这就是我所做的:

Private Sub eng_name_LostFocus()
    Dim val As String
    val = Replace(eng_name.Value, ".", " ")
    eng_name.Value = val
End Sub

但它什么都不做......

我能改变什么来解决它?

1 个答案:

答案 0 :(得分:1)

Private Sub eng_name_AfterUpdate()
    Me!eng_name = Replace(Me!eng_name, ".", " ")
End Sub

我认为您只需要AfterUpdate,因为它只会在eng_name的值发生变化时触发。

我总是使用Me!ControlName来获取/设置Access中控件的值。