Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Nico5 am Januar 13, 2023, 16:07:39

Titel: Fehler im Vergleich
Beitrag von: Nico5 am Januar 13, 2023, 16:07:39
Guten Tag liebe Access-Gemeinde,
vielleicht kann mir einer helfen. Ich versuche im Code einen Vergleich "kleiner als" einzubauen. Mein Ergebnis ist aber stets Null. Hier ist der Code:

Private Sub cmdAlle_Click()
    Me.FilterOn = False
    Me.txtFuttermenge = ""
End Sub

Private Sub cmdAnzeigen_Click()
    Me.Filter = "Futtermenge Like '*<=" & Me.txtFuttermenge & "*'"
    Me.FilterOn = True
End Sub



Der Fehler ist gewiss wieder Simpel... ich komme gerade aber nicht drauf. Wäre euch sehr dankbar :)

LG Nico
Titel: Re: Fehler im Vergleich
Beitrag von: MzKlMu am Januar 13, 2023, 17:14:55
Hallo,
was willst Du bei einem Zahlenvergleich mit Like und dem Joker (*). Das ist hier ziemlich sinnfrei.
Versuche es einfach mal so:
Private Sub cmdAnzeigen_Click()
    Me.Filter = "Futtermenge <=" & Me.txtFuttermenge
    Me.FilterOn = True
End Sub

Zum leeren von Feldern nimmt man keinen Leerstring, sondern setzt das Feld auf Null. Außerdem sollte auch der Filterstring geleert werden.

Private Sub cmdAlle_Click()
    Me.Filter = ""
    Me.FilterOn = False
    Me.txtFuttermenge = Null
End Sub


Titel: Re: Fehler im Vergleich
Beitrag von: Nico5 am Januar 13, 2023, 17:19:37
Ja ich bin ein Wurm.... aber vielen Dank... jetzt klappt es ^^