Hallo,
ich habe mal wieder eine Frage:
Ich habe unten im Spoiler den ganzen Code und hier direkt drunter, um was es mir geht und zwar:
Ich wollte diesen Array in der Elseif Funktion prüfen lassen. Zuerst habe ich an eine For Each Schleife gedacht dann aber was von List(Of String) gelesen. Wie kann ich das umsetzen? (Daraus resultiert, dass mein Code an dieser Stelle nicht funktioniert )
Freue mich über Feedback.
Spoiler anzeigen
ich habe mal wieder eine Frage:
Ich habe unten im Spoiler den ganzen Code und hier direkt drunter, um was es mir geht und zwar:
Ich wollte diesen Array in der Elseif Funktion prüfen lassen. Zuerst habe ich an eine For Each Schleife gedacht dann aber was von List(Of String) gelesen. Wie kann ich das umsetzen? (Daraus resultiert, dass mein Code an dieser Stelle nicht funktioniert )
Freue mich über Feedback.
VB.NET-Quellcode
- Sub Aktuell()
- Dim pan() = {pan_e, pan_b}
- Dim Klasse = tbx_class.Text
- Dim Name = cbx_main.Text
- Dim WPBEL = New List(Of String) From {"x, y, z"}
- If Name = "a" Then
- For Each panel As Panel In pan
- For Each ckb As CheckBox In panel.Controls.OfType(Of CheckBox)()
- ckb.Enabled = False
- Next
- Next
- ElseIf Name = "b" Then
- ckb_e4.Enabled = False
- ckb_b4.Enabled = False
- ckb_e5.Enabled = False
- ckb_b5.Enabled = False
- ElseIf Name = "c" Then
- ckb_e3.Enabled = False
- ckb_b3.Enabled = False
- ElseIf Name = "d" Then
- ckb_e3.Enabled = False
- ckb_b3.Enabled = False
- ckb_e4.Enabled = False
- ckb_b4.Enabled = False
- ckb_e5.Enabled = False
- ckb_b5.Enabled = False
- ElseIf Not Name = WPBEL.Contains(ToString) Then
- ckb_e3.Enabled = False
- ckb_b3.Enabled = False
- ckb_e4.Enabled = False
- ckb_b4.Enabled = False
- ckb_e5.Enabled = False
- ckb_b5.Enabled = False
- Else
- For Each panel As Panel In pan
- For Each ckb As CheckBox In panel.Controls.OfType(Of CheckBox)()
- ckb.Enabled = True
- Next
- Next
- End If
- End Sub