Bedingung zur Dateneingabe im Formular

22/04/2008 - 16:55 von Kohlmeyer.Sinja | Report spam
Guten Tag,
ich möchte gern eine Bedingung zur Beantwortung einer Frage im
Formular (Access) erstellen.
Wie im nàchsten Beispiel funktioniert es aber nicht.
Also bei Antwort 1,2 und 3 soll Frage 4 beantwortet werden können.

Private Sub Frag_3_AfterUpdate()
Me!Frag_4.Enabled = (Me!Frag_3.Value = "1")
Me!Frag_4.Enabled = (Me!Frag_3.Value = "2")
Me!Frag_4.Enabled = (Me!Frag_3.Value = "3")
End Sub

es klappt auch leider nicht mit einer OR Verbindung zwischen 1,2 und
3..oder meine Syntax ist falsch.

Ich wàre dankbar für einen Tipp.
 

Lesen sie die antworten

#1 André Minhorst
22/04/2008 - 17:04 | Warnen spam
Hi Sinja,

schrieb:
ich möchte gern eine Bedingung zur Beantwortung einer Frage im
Formular (Access) erstellen.
Wie im nàchsten Beispiel funktioniert es aber nicht.
Also bei Antwort 1,2 und 3 soll Frage 4 beantwortet werden können.

Private Sub Frag_3_AfterUpdate()
Me!Frag_4.Enabled = (Me!Frag_3.Value = "1")
Me!Frag_4.Enabled = (Me!Frag_3.Value = "2")
Me!Frag_4.Enabled = (Me!Frag_3.Value = "3")
End Sub

es klappt auch leider nicht mit einer OR Verbindung zwischen 1,2 und
3..oder meine Syntax ist falsch.



Select Case me!Frag_3
Case 1,2,3
me!Frag_4.enabled = true
end Select

oder

If Me!Frag_3 = 1 or me!frag_3 = 2 or me!frag_3 = 3 then
Me!Frag_4.enabled = true
end if

oder abgekürzt

Me!Frag_4.enabled = (Me!Frag_3 = 1 or me!frag_3 = 2 or me!frag_3 = 3)

Ciao
André

http://www.access-entwicklerbuch.de
http://www.access-im-unternehmen.de

Ähnliche fragen