Question

access 如何用VBA清除文本框里的文字

如题，窗体通过按钮获取文本框和组合框的字符串：

'录入数据
txtDate.SetFocus
Rs.Fields("PurchaseDate") = txtDate.Text

cmbWayToPay.SetFocus
Rs.Fields("WayToPay") = cmbWayToPay.Text

txtComsumption.SetFocus
Rs.Fields("Comsumption") = txtComsumption.Text

txtCost.SetFocus
Rs.Fields("Cost") = txtCost.Text

txtOthers.SetFocus
Rs.Fields("Others") = txtOthers.Text

'保存数据
Rs.Update

'提示用户
MsgBox ("记录已保存！！")
----------------------------------------------------------------
然后我想系统自动清除文本框和组合框里的字符串，用VBA应该怎样写？

Answer 1

access 如何用VBA清除文本框里的文字的方法如下：
假设文本框的名字为textbox1,那么在代码里这样写就可以：
textbox1.text=""
如果有多个控件需要同样的操作，可以用控件数组来实现。

Answer 2

txtDate.Text=""
cmbWayToPay.Text=""

追问

这个方法是可以，如果我的文本框有若干个，有没有更快捷的批量处理方法？
或有没有像C#里的 能使用CLEAR属性或方法呢？

追答

要用控件数组

追问

这个我不懂，有没有相关的资料链接可以参考？