Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: J.D am Februar 01, 2024, 09:35:49

Titel: Zwei Bilder per Checkbox ein / aus schalten!
Beitrag von: J.D am Februar 01, 2024, 09:35:49
Hi Forum,

ich hätte da mal wider ein Problem.

Ich habe im Forumlar zwei Bilder eingefügt...
Ich möchte wenn ich die Checkbox auswähle das Flage1 angezeigt wird, wenn ich die Checkbox abwähle möchte ich das Flage1 ausgeblendet wird und Flage2 angezeigt wird... Die Bilder stehen auf Visible No
Private Sub Check54_AfterUpdate()
    If Me!Check54.Visible = -1 Then
        Me.Flage1.Visible = False
        Me.Flage2.Visible = True
        End If
    If Me!Check54.Visible = 1 Then
        Me.Flage1.Visible = True
        Me.Flage2.Visible = False
        End If
    Forms!Kunden.Requery
End Sub

Grüsse JD
Titel: Re: Zwei Bilder per Checkbox ein / aus schalten!
Beitrag von: PhilS am Februar 01, 2024, 09:57:53
Im Sinne von Hilfe zur Selbsthilfe:
Schau dir doch die folgende Zeile nochmal an und denke über deren Bedeutung nach:
If Me!Check54.Visible = -1 Then
Nebenbei, aber nicht der zentrale Punkt, Ja/Nein-Werte korrespondieren zu den Zahlen -1 und 0. Man kann in VBA sehr gut mit den eingebauten Konstanten True und False arbeiten, was die Beachtung solcher Interna dann weniger relevant macht.
Titel: Re: Zwei Bilder per Checkbox ein / aus schalten!
Beitrag von: J.D am Februar 01, 2024, 12:49:02
hmm,
ok ich habe es hinbekommen, danke...
Das .Visible an der Checkbox, macht natürlich kein sinn!

Grüsse JD
Titel: Re: Zwei Bilder per Checkbox ein / aus schalten!
Beitrag von: Beaker s.a. am Februar 01, 2024, 17:35:23
Hallo,

Das If-Gedönse kannst du dir sparen.
Eine Checkbox gibt True oder False zurück. Diesen Wert kannst du der
Visible-Eigenschaft also direkt zuweisen
Me.Flage1.Visible = Me.Check54    'hier wird die Standardeigenschaft .Value übergeben, sichtbar ist die Box allemal
Me.Flage2.Visible = Not Me.Check54
gruss ekkehard