檢查複選框時將值賦給數組VB.NET

Question

我有複選框checkbox_1，checkbox_2 ....直到checkbox_10。我想創建一個循環來存儲：如果複選框被選中，則返回0，如果複選框未被選中，則返回0（位置（10））數組。

Answer 1

這可能與一些來完成，如：

For i As Integer = 1 To 10 
    Dim matches() As Control = Me.Controls.Find("checkbox_" & i, True) 
    If matches.Length > 0 AndAlso TypeOf matches(0) Is CheckBox Then 
     Dim cb As CheckBox = DirectCast(matches(0), CheckBox) 
     Locations(i - 1) = IIf(cb.Checked, 1, 0) 
    End If 
Next