{首页主词},&

admin

2013年11月19日 8:24 本文熱度 5655

我的vb程序有很多form，每個form里有很多command，
我想按一個按鈕之后，讓所有的command的enabled屬性都為true，這個怎么實(shí)現(xiàn)呢？

對于已經(jīng)可以看見的窗體，可以用下列代碼：

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

對于不可見的，可以通過設(shè)置一個全局的布爾變量，F(xiàn)orm_Load里面設(shè)置

該文章在 2013/11/19 8:24:19 編輯過

關(guān)鍵字查詢

批量

控件

修改

相關(guān)文章

正在查詢...