Clearing-check-Boxen in VB.NET

Mache ich einen Einsatz für Uni und in meinem VB.NET in der form habe ich einige Checkboxen, die ich versuche zu Durchlaufen und löschen Sie Sie (ich habe eine Taste, welche die klare form)

Mein problem ist, dass es scheint keine Eigenschaft, die ich verwenden können, um den Status des Kontrollkästchens, wenn Sie nicht explizit sagen VB die checkbox, die ich verwenden möchten. zum Beispiel, ich kann gehen 

WineCheckBox.Checked = False

Wird, überprüfen Sie die box, aber ich Zauberstab zu TROCKNEN den code ein wenig, und nicht, wiederholen Sie dies für jedes Kontrollkästchen, die ich habe, das ist, was ich versuche zu tun:

If TypeOf element Is CheckBox Then
    element.Checked = False
End If

Ich habe versucht, mit element.CheckState und element.Checked und beide Male habe ich erhalten "Aktiviert haben (oder CheckState) ist kein member von System.Windows.Formen.Control"

Ist, habe ich mich durch all die Attribute, die ich finden kann für dieses und keiner von Ihnen scheinen für mich...

Bin ich etwas fehlt? oder ist das einfach nicht möglich

Dank

EDIT:

dies ist der gesamte code-block:

'clear the controls
    For Each element As Control In Me.Controls
        If TypeOf element Is TextBox Then
            element.Text = ""
        End If
        If TypeOf element Is CheckBox Then
            element.Checked = False
        End If
    Next
InformationsquelleAutor Zen | 2011-03-18
  1. 8

    Welche Art haben Sie erklärt element wie? Wenn es nur eine Control dann ist dies ein Basis-Typ für CheckBox dass nicht die checked-Eigenschaft. Vielleicht versuchen:

    If TypeOf element Is CheckBox Then
    DirectCast(element,CheckBox).checked = False
End If
    • Hinzugefügt mehr an den code zum ursprünglichen Beitrag
    • Ich würd dir empfehlen die Verwendung DirectCast da ist es nur Checkboxen oder abgeleitete Steuerelemente, die zu True ausgewertet werden. Dies umgeht den zusätzlichen Aufwand mit CType wie es manchmal ist, jemanden zu nötigen Werte in einen anderen Typ. Siehe diese Antwort zu einer meiner früheren Fragen (Casting-Datentypen mit DirectCast, CType, TryCast).
    InformationsquelleAutor Jon Egerton
  2. 2

    Wie etwa:

       For Each element As Control In Me.Controls
        If TypeOf element Is TextBox Then
            element.Text = ""
        End If
        If TypeOf element Is CheckBox Then
            Dim chk As CheckBox = CType(element, CheckBox)
            chk.Checked = False
        End If
    Next
    InformationsquelleAutor Matt Wilko
Schreibe einen Kommentar