2011-07-14 68 views
0

我在訪問2007中以某種形式擁有文本框。 我試圖用某些VBA替換文本框中文本的所有點(。)。如何替換訪問中的文本框的文本值2007

這是我做過什麼:

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

但它什麼也不做......

我可以改變什麼去解決它?

回答

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

我想你只需要AfterUpdate,當的eng_name值改變它時纔會觸發。

我總是使用Me!ControlName在Access中獲取/設置控件的值。

+0

它沒有工作... – CaTz

+0

剛剛測試過它,適用於Access 2003.您是否註冊了控件的AfterUpdate事件? – Jacob

+0

我的錯誤...:|訪問的安全性關閉了VBA。現在它的作品! :P – CaTz