禁用表单上的特定控件

时间:2017-07-26 17:08:04

标签: vba access-vba

我看了一遍,甚至仔细检查了文档,而且我很难找到一个看似简单问题的答案。

    Dim ctl As Control
For Each ctl In Me.Controls
    If ctl.ControlType <> acComboBox Then
        If ctl.Name <> "SrchVal" Then
            ctl.Enabled = False
        End If
    End If
Next ctl

我的表单上有很多文本框控件,用于输入数据。它们都应该被锁定(禁用),直到单击某个按钮,这个事件我稍后会处理。

但是,有一些组合框控件和一个文本框控件我不想禁用,标题为SrchVal

我知道Control对象没有Enabled属性,所以如何解决这个问题呢?

1 个答案:

答案 0 :(得分:0)

尝试以下代码:

array_splice($a, count($a), 0, $b);