vb 如何批量修改控件的属性

admin

2013年11月19日 8:24 本文热度 4997

我的vb程序有很多form，每个form里有很多command，
我想按一个按钮之后，让所有的command的enabled属性都为true，这个怎么实现呢？

对于已经可以看见的窗体，可以用下列代码：

Private Sub Command1_Click()

Dim Frm As Form

Dim Cmd As Control

For Each Frm In Forms

For Each Cmd In Frm.Controls

If TypeOf Cmd Is CommandButton Then

Cmd.Enabled = True

End If

Next

End Sub

Private Sub Form_Load()

Form2.Show

End Sub

对于不可见的，可以通过设置一个全局的布尔变量，Form_Load里面设置

该文章在 2013/11/19 8:24:19 编辑过

关键字查询

批量

控件

修改

正在查询...