Visual Basic - Beitrag #4 - Post 239714 - Computer Hardware Forum - TweakPC -

01.02.2005, 16:58

Ja ok, aber wenn ich auf den Button klicke, dann geschieht nichts, wenn:

Code:

Private Sub cmdOnOFF_Click()
    If Laser = True Then
        label1.Caption = "deaktiviert"
        label1.ForeColor = vbRed
        Laser = False
        Exit Sub
    Else
    
        label1.Caption = "aktiviert"
        label1.ForeColor = &HC000&
        Laser = True
        Exit Sub
    End If
End Sub

der Code ist und in der Form Load

Code:

Laser = true

steht. es wird höchstens in der Caption "aktiviert" reingeschrieben...und nicht danach "DeAktiviert", wie es im Wechsel sein soll.

01.02.2005, 16:58	#4 (permalink)
cromelain Gast Beiträge: n/a	AW: Visual Basic Ja ok, aber wenn ich auf den Button klicke, dann geschieht nichts, wenn: Code: Private Sub cmdOnOFF_Click() If Laser = True Then label1.Caption = "deaktiviert" label1.ForeColor = vbRed Laser = False Exit Sub Else label1.Caption = "aktiviert" label1.ForeColor = &HC000& Laser = True Exit Sub End If End Sub der Code ist und in der Form Load Code: Laser = true steht. es wird höchstens in der Caption "aktiviert" reingeschrieben...und nicht danach "DeAktiviert", wie es im Wechsel sein soll.
cromelain Gast Beiträge: n/a