Wie kann ich dem System sagen, dass ein Kontrollkästchen aktiviert sein muss, damit ein Buttom seine Funktion ausführt?

Question

Hallo,

ich schreibe gerade eine Form mit mehreren Buttoms, die jeweils aus dem Code heraus eine bestimmte Aktion ausführen. Allerding möchte ich dem System sagen, dass ein Kontrollkästchen aktiviert werden muss bevor eine Aktion ausgeführt wird, d.h ich möchte, dass die Funktion eines der (9) Buttons erst ausgeführt wird, wenn das Kontrollkästchen aktiviert ist. Dabei soll allerdings das Kontrollkästchen für alle Buttons gelten, d.h. egal auf welchen Button ich klicke, das Kontrollkästchen muss aktiviert sein.

Answer 1

Setze einfach, wenn die Checkbox nicht aktiviert ist, die Enabled- Eigenschaft aller Buttons auf false.
Alternativ kannst du dem Handler für das Click- Ereigniss jedes Buttons Code hinzufügen, der prüft ob die Checkbox aktiviert ist.

Answer 2

Aber wie stelle ich das ein, dass überprüft wird, ob die  Checkbox aktiviert ist?
Wenn ich

Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.GiveFeedback

eingebe, funktioniert es nicht. Wo muss ich was eingeben? Muss ich das doch im Eigenschaftenfenster einstellen oder irgendwo im Progremm?

Meine Puplic Class:


Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Shell("shutdown -p")
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Shell("shutdown -r")
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Shell("shutdown -g")
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Shell("shutdown -s")
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        Shell("shutdown -a")
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Shell("shutdown -h")
    End Sub

    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Shell("shutdown -l")
    End Sub

    Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
        Console.WriteLine("Nicht empfehlenswert!!! Trotzdem ausführen? <Ja> + ENTER  zum fortfahren eingeben")
        Dim janein As String = Console.ReadLine()
        If janein = ("Ja") Then
            Shell("shutdown -f")
        End If
    End Sub

    Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button11.Click
        Shell("shutdown -i")
    End Sub

    Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click
        Shell("shutdown")
    End Sub

    Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click
        Shell("shutdown")
    End Sub
End Class

Aaaah!

Lukas

Answer 3

Überprüfe einfach vor dem Shell()- Aufruf immer mit einer If- Condition, ob das Kästchen aktiviert ist oder nicht.

If CheckBox.Checked Then
 Shell("...")
End If

Answer 4

Danke