vba - 使用后清除文本框

Question

我有一个访问表单，我在其中输入数据以插入表中进行存储，我使用的代码是

Private Sub cmd_go_Click()
Dim insertstring As String

insertstring = "INSERT INTO KWTable (KW, Source, Code) VALUES('" & text_key.Value & "','" &         combo_source.Value & "','" & txt_code.Value & "');"

DoCmd.RunSQL insertstring

End Sub

我想知道是否可以添加一个代码，以便在插入数据后，文本框和组合框会自动清除？

Answer 1

使用控件的属性。具体来说，尝试将.Textor.Value属性设置为""：

txtTextBox.Text = ""

或者：

txtTextBox.Value = ""