Vb.net VB-取消选中组框中的复选框
目前,我有5个组框,所有组框都充满了复选框,当我想取消选择所有组框时(对于“清除选择”按钮),我使用我在论坛上找到的以下代码:Vb.net VB-取消选中组框中的复选框,vb.net,checkbox,groupbox,Vb.net,Checkbox,Groupbox,目前,我有5个组框,所有组框都充满了复选框,当我想取消选择所有组框时(对于“清除选择”按钮),我使用我在论坛上找到的以下代码: For Each CheckBox In grpbox_Hiragana CheckBox.checked = "false" 首先,我确信这是取消选中复选框的正确方法,其次,“grpbox_Hiragana”组框返回以下错误: 表达式的类型为“System.Windows.Forms.GroupBox”,它不是集合类型 如果有人能确认这是正确的方法/
For Each CheckBox In grpbox_Hiragana
CheckBox.checked = "false"
首先,我确信这是取消选中复选框的正确方法,其次,“grpbox_Hiragana”组框返回以下错误:
表达式的类型为“System.Windows.Forms.GroupBox”,它不是集合类型
如果有人能确认这是正确的方法/请告诉我为什么groupbox不被接受,以帮助修复错误,这将非常好。如果您在一个group box上有所有复选框,请使用以下代码:
Dim ChkBox As CheckBox = Nothing
' to unchecked all
For Each xObject As Object In Me.GroupBox1.Controls
If TypeOf xObject Is CheckBox Then
ChkBox = xObject
ChkBox.Checked = False
End If
Next
' to checked all
For Each xObject As Object In Me.GroupBox1.Controls
If TypeOf xObject Is CheckBox Then
ChkBox = xObject
ChkBox.Checked = True
End If
Next
或者您可以使用CheckedListBox控件。代码行数较少的替代方法是:
For Each ChkBox As CheckBox In GroupBox1.Controls
ChkBox.Checked = False
Next
顺便说一句,如果您添加了
.controls
,As复选框只会启用intellisense(并确保只处理复选框)。这是我希望得到的代码类型。它工作得非常完美,非常清晰,帮助!谢谢:D