如何檢查是否選中了動態創建的復選框（VB.NET）？

Question

我開始循環遍歷動態創建的復選框：

For Each cntrl As Control In Me.Controls
    If TypeOf cntrl Is CheckBox Then
        If (cntrl As CheckBox).Checked Then
            'Do Something
        End If
    End If
Next

...但是我不知道我需要什么，而不是這條線：

If (cntrl As CheckBox).Checked Then

...這只是猜測，無法編譯。

Answer 1

使用LInQ可以節省一些代碼行：

Sub Test()
    Dim myList as New List(Of CheckBox)
    For Each cbox As CheckBox In Me.Controls.OfType(Of CheckBox).Where(Function(cb) cb.Checked)
        myList.Add(cbox)
    Next
    Msgbox(String.Format("{0} checkboxes were checked!", myList.Count))
End Sub

Answer 2

我認為您想做的是：

If DirectCast(cntrl, CheckBox).Checked = True Then

Answer 3

我會這樣做：

Dim con As Checkbox
For Each con In Me.Controls
   If con.Checked = True
      'Do Something
   End If
Next