tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: VB2005で「フォーム上のすべてのコントロールへのアクセス」
投稿日: 2008/04/01(Tue) 17:57
投稿者魔界の仮面弁士
> すべてのコントロールに対して「再帰」してください。

実装例:


Public Class Form1

    Private Sub CheckBox1_CheckedChanged(ByVal sender As Object, ByVal e As EventArgs) Handles CheckBox1.CheckedChanged
        SetButtonEnabled(Me, CheckBox1.Checked)
    End Sub

    Public Shared Sub SetButtonEnabled(ByVal target As Control, ByVal value As Boolean)
        If TypeOf target Is Button Then
            target.Enabled = value
        End If
        For Each c As Control In target.Controls
            SetButtonEnabled(c, value)
        Next
    End Sub

End Class

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。