Enabled, locked...?

Hallo zusammen,
ich habe da ein kleines Problem, bei dem ich nicht weiter komme…

Ich habe in einem Formular ein Listenfeld angelegt, in dem ich Werte anzeigen lasse, die bereits in der Datenbank existieren. Es werden dabei mehrere Kriterien überprüft.
Nun möchte ich abhängig davon, ob in diesem Listenfeld Daten stehen oder nicht, eine Schaltfläche aktivieren bzw. deaktivieren.
Solange also keine Werte in dem Listenfeld sind… soll die betreffende Schaltfläche deaktiviert (enabled) bleiben.
Hat jemand eine Idee?
Danke

Gruß
Uli

Hallo zusammen,

Hallo, alleine.

Ich habe in einem Formular ein Listenfeld angelegt, in dem ich
Werte anzeigen lasse, die bereits in der Datenbank existieren.
Es werden dabei mehrere Kriterien überprüft.

Also wird das Listenfeld bleistiftsweise mit der Anweisung

SELECT cognac, whisky FROM barfach WHERE nochnichtvoll=True;

gefüllt.

Dann ist die Zahl der im Listenfeld vorhandenen Sätze

ZahlSchnäpse_=DCount("*",„barfach“,„nochnichtvoll=True“)_

und Du kannst es der Schaltfläche wie folgt besorgen :

Sub Form\_Current()

If ZahlSchnäpse=0 Then

 TrinkNochEinen.Enabled=False

Else

 TrinkNochEinen.Enabled=True

End If

End Sub

Sub Listenfeld\_AfterUpdate()

TrinkNochEinen.Enabled=(AnzahlSchnäpse0)

End Sub

Müßte eigentlich funktionieren.

Prost! kw