Set the CheckBox to Unchecked

Question

1.00/5 (2 votes)

See more:

My Form1 have above 10 Checkbox

how can I set the all checkbox to Unchecked

Dim xControl As Control
For Each xControl In me.Controls

   If TypeOf xControl Is TextBox Then
      xControl.ResetText()
   End If

   If TypeOf xControl Is CheckBox Then
      DirectCast(xControl , CheckBox).CheckState = CheckState.Unchecked
   End If

   If TypeOf xControl Is RadioButton Then
      DirectCast(xControl , RadioButton).Checked = False
   End If

   If TypeOf xControl Is ComboBox Then
      xControl.ResetText()
   End If

Next

That is my last Accept Solution

Posted 18-Jun-15 3:46am

Member 11702607

Updated 18-Jun-15 16:03pm

v4

Add a Solution

Comments

Sergey Alexandrovich Kryukov 18-Jun-15 10:01am

First of all, what do you mean by Form, exactly?
—SA

4 solutions

Solution 1

Check this out: http://www.vbforums.com/showthread.php?649278-Uncheck-all-CheckBoxes[^]

Posted 18-Jun-15 3:59am

Peter Leow

Solution 4

Dim xControl As Control
For Each xControl In me.Controls
 
   If TypeOf xControl Is TextBox Then
      xControl.ResetText()
   End If
 
   If TypeOf xControl Is CheckBox Then
      DirectCast(xControl , CheckBox).CheckState = CheckState.Unchecked
   End If
 
   If TypeOf xControl Is RadioButton Then
      DirectCast(xControl , RadioButton).Checked = False
   End If
 
   If TypeOf xControl Is ComboBox Then
      xControl.ResetText()
   End If
 
Next

Posted 18-Jun-15 16:03pm

Member 11702607

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

CHill60 · Accepted Answer · 2015-06-18T03:59:00

Solution 2

Something like this would do it

VB

For Each Control In Me.Controls
    If TypeOf (Control) Is CheckBox Then
        Dim work As CheckBox = Control
        work.Checked = False
    End If
Next

Posted 18-Jun-15 3:59am

CHill60

Comments

Member 11702607 18-Jun-15 21:36pm

Dim xCheckBox As Control
For Each xCheckBox In Me.Controls
If TypeOf xCheckBox Is CheckBox Then
Dim work As CheckBox = CType(xCheckBox , CheckBox)
work.Checked = False
End If
Next

Member 11702607 · Accepted Answer · 2015-06-18T15:40:00

Solution 3

Dim xCheckBox As Control
For Each xCheckBox In Me.Controls
   If TypeOf xCheckBox Is CheckBox Then
      Dim work As CheckBox = CType(xCheckBox , CheckBox)
      work.Checked = False
   End If
Next

Posted 18-Jun-15 15:40pm

Member 11702607