Hallo
warum geht die Loop Methode nicht mit Checkboxen?
Ich frage mehrere Checkboxen ab, kann herausfinden welche gedrückt wurde aber die Controls.Item funtion funktioniert aber nicht wie bei Buttons etc.
die folgende Zeile funktioniert gut als Button:
Controls.Item("Button" & i + 30).visible = True
aber nicht als Controlbox:
If Controls.Item("CheckBox" & i).checked = True Then MsgBox("true")
die Funktion .checked, Visible etc. stehen nicht zur Verfügung.
Wäre cool ich könnte die Checkboxen einfach im Loop abfragen wie Buttons.
Danke für einen Tip
warum geht die Loop Methode nicht mit Checkboxen?
Ich frage mehrere Checkboxen ab, kann herausfinden welche gedrückt wurde aber die Controls.Item funtion funktioniert aber nicht wie bei Buttons etc.
die folgende Zeile funktioniert gut als Button:
Controls.Item("Button" & i + 30).visible = True
aber nicht als Controlbox:
If Controls.Item("CheckBox" & i).checked = True Then MsgBox("true")
die Funktion .checked, Visible etc. stehen nicht zur Verfügung.
Wäre cool ich könnte die Checkboxen einfach im Loop abfragen wie Buttons.
Danke für einen Tip
Quellcode
- Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged, CheckBox2.CheckedChanged, CheckBox3.CheckedChanged, CheckBox4.CheckedChanged
- Dim b As CheckBox = DirectCast(sender, CheckBox)
- Dim howmuchplayers As Integer = Nothing
- For i = 1 To 30
- If b.Name = "CheckBox" + Trim(i) Then ..... irgendwas
- If Controls.Item("CheckBox" & i).Checked = True Then ..... irgendwas
- Next
- End sub