在访问表单中,我在表单末尾有多个文本框和一个保存按钮。我通过在“当前表单”事件属性上使用Me.savebutton.Enabled = False
使按钮最初变灰。我希望在任何文本框变脏时启用该按钮。
如果我为每个文本框的“ On Dirty”事件属性键入Me.Command21.Enabled = True
,则可以实现此目的,但是表单上有很多文本框,并且不想为每个文本框键入该代码。我以为必须要有一种方法来遍历窗体上的所有控件,但是问题是我在窗体上也有2个组合框。所以我需要类似的东西:
For Each ctl in me.controls
if ctl.ControlType = acTextBox Then
但是我不知道如何循环代码以及在哪里引入if脏话。
感谢您的帮助!