Hallo Zusammen


Ich Möchte das wenn alle 5 Check Boxe , Gechekt sind das Buttong 1 Enable = True geht möglich?

klar is des möglich:

Private Sub Checkboxchecked (...) handles Checkbox1.Checked, Checkbox2.checked .... Checkbox5.checked
Dim i As Integer = 0
For each ctr as Control in me.controls
IF typeOF(ctr) IS Checkbox Then
Dim che As Checkbox = DirectCast(ctr, Checkbox)
If che.Checked = True Then i += 1

EndIF
EndFor

If i = 5 Then Button1.Enabled = True

EndSub

Noch anfäneger... ich verstehe deinen Code nicht so ganz....
Kannst mir etwas näher erklären oder wie und wo genau er eingefügt wird

Sobald eine Checkbox gecheckt wird, durchläuft er in einer Schleife alle Checkboxes, und wenn 5 davon True sind wird Button1.Enabled = true.



Grüße

Sollte so klappen...kleinigkeit geändert von Vitox

Von mir auch mal noch ne kleiner veränderung.

@thema:

der code muss in das checked-changed event aller fünf checkboxen!
du kannst es aber auch in nur ein event tuen an dem du hinten das hier hinschreibst:
Handled Checkbox1.CheckedChanged, CheckBox2.CheckedChanged, Checkbox3.Checkchanged, CheckBox4.CheckedChanged, Checkbox5.CheckedChanged

dann wir wie thucommix schon gesagt hat eine schleife durchlaufen, die die checkboxen alle abfragt, wenn alle fünf gechecked sind, dann wir der button auf enabled = True gesetzt!

Geht doch noch leichter.

Danke genau das wollte ich wissen wie das Funktienirt will ja auch was lernen

und danke an den anderen für verbesserung des codes

ERLEDIGT