2017-07-08 24 views
0

我在VBA中執行此命令的訪問形式有一個按鈕相同的按鈕記錄添加到一個文本框使用刪除從不同的文本框中的紀錄

Private Sub Command12_Click() 
On Error GoTo Command12_Click_Err 

If Not IsNull (txtSearchbar) Then 
    DoCmd.ApplyFilter "", "[Progress] Like "*" & [Forms]![APIReleasing]![txtSearchbar] & ""*""","" 
    DoCmd.RunCommand acCmdDeleteRecord 
End Sub 

的事情是,我也想要添加在txtSearchbar中輸入的相同信息以添加到另一個文本框中。那我該怎麼做呢?

回答

0

我會用這個過濾條件:

"[Progress] Like '*" & Me.txtSearchbar & "*'" 

添加文本到文本框另:

Me.txtAnotherTextBox.Value = Me.txtSearchbar.Value 

.Value可以省略,但在某些情況下,它可能會導致不正確的結果。

+0

我試過使用 'Me.Serving.Value = Me.txtSearchbar.Value' 現在它給了我錯誤_Microsoft Access無法找到您的表達式中引用的字段'服務'。當文本框被稱爲服務 –

+0

非常確定,這是名義上的錯字。 VBA編輯器的Intellisence應該在輸入Me時在方法/屬性列表中顯示「Serving」。它顯示嗎?選擇它。也嘗試將'Serving'文本框重命名爲,例如'txtServing' –

相關問題