Checked-Status eines Checkboxes-Array abfragem

28/08/2007 - 16:11 von Nicolas Nickisch | Report spam
Ich habe ein Checkboxen-Array erstellt. Alle Checkboxen sind in einem Panel
untergebracht

Mit for..each .. in ..panel1.controls wird jedem Kontrollkàstchen dann noch
der richtige Text zugewiesen

Das klappt dann auch ganz gut.

Aber jetzt möchte ich den Status jedes kontrollkàstchens auslesen.


Normalerweise würde ich einfach Checkbox1.Checked nutzen - aber das geht bei
einem Array ja mal nicht.

Alle Artikel im Netz beschàftigen sich fast ausschliesslich damit, dass es
ganz einfach wàre jedem Kontrollkàstchen eine Ereignisprozedur
hinzuzufügen - aber das ist gar nicht mein Problem.

Ich benötige gar keine Ereignisauswertung.

Ich will nur wissen, welche der Kàstchen ein Hàkchen haben.

Kann mir jemand helfen ?

Gruss Nico
 

Lesen sie die antworten

#1 Robert Schneider
28/08/2007 - 16:50 | Warnen spam
"Nicolas Nickisch" schrieb im Newsbeitrag
news:46d42d2e$0$30378$
Ich habe ein Checkboxen-Array erstellt. Alle Checkboxen sind in einem
Panel untergebracht

Mit for..each .. in ..panel1.controls wird jedem Kontrollkàstchen dann
noch der richtige Text zugewiesen

Das klappt dann auch ganz gut.

Aber jetzt möchte ich den Status jedes kontrollkàstchens auslesen.


Normalerweise würde ich einfach Checkbox1.Checked nutzen - aber das geht
bei einem Array ja mal nicht.

Alle Artikel im Netz beschàftigen sich fast ausschliesslich damit, dass es
ganz einfach wàre jedem Kontrollkàstchen eine Ereignisprozedur
hinzuzufügen - aber das ist gar nicht mein Problem.

Ich benötige gar keine Ereignisauswertung.

Ich will nur wissen, welche der Kàstchen ein Hàkchen haben.

Kann mir jemand helfen ?




So vielleicht:

Function GetCheckedControls() As CheckBox()

Dim ctrlList As New List(Of CheckBox)

For Each c As Control In Panel1.Controls
If TypeOf c Is CheckBox Then
Dim check As CheckBox = DirectCast(c, CheckBox)
If check.Checked Then ctrlList.Add(check)
End If
Next

Return ctrlList.ToArray

End Function


e-mail: r_.s_chnei_der\wein_gart_ner.com (remove all '_' and replace '\'
with
'@')

Ähnliche fragen