当选中复选框VB.NET时，将值赋给数组

Question

我的复选框名为checkbox_1，checkbox_2 ....最多为checkbox_10。我想创建一个存储循环：如果选中复选框则为1;如果未选中复选框，则为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