Supportnet / Forum / Datenbanken
Access inputbox mit Formatvorgabe
Frage
Hallo Hallo
ich hab da mal ne Frage:
Ist es möglich in Access bei einer inputbox-Abfrage das Format vorzugenben, soll heissen ich will nur
ein Datum tt.mm.jj zulassen.
Im optimalsten Fall soll der User auch die Punkte nicht eingeben müssen.
Gibt es eine Retterin oder einen Retter für mich?
Viele Grüße
Eleve
Antwort 1 von rolandaa
hallo,
in eine normalen inputbox ist es meines wissens nach nicht möglich feste konvertierungen zu verwenden.
man könnte zur erkennung einen default wert setzen, was aber nicht viel bringt - beispiel:
Sub test()
Dim ergebnis As Date
dat = Date
ergebnis = InputBox("Bitte Datum", "Datumseingabe", dat)
End Sub
auch könnte man die eingegebenen zahlen nach einem "Punkt" abfragen und wenn dieser fehlt ihm automatisch einfügen, aber ich denke das geht zu weit.
mfg
roland
in eine normalen inputbox ist es meines wissens nach nicht möglich feste konvertierungen zu verwenden.
man könnte zur erkennung einen default wert setzen, was aber nicht viel bringt - beispiel:
Sub test()
Dim ergebnis As Date
dat = Date
ergebnis = InputBox("Bitte Datum", "Datumseingabe", dat)
End Sub
auch könnte man die eingegebenen zahlen nach einem "Punkt" abfragen und wenn dieser fehlt ihm automatisch einfügen, aber ich denke das geht zu weit.
mfg
roland
Antwort 2 von Eleve
Hallo Roland
danke für die Antwort. Ich werde mich mal daran versuchen.
Viele Grüße
Eleve
danke für die Antwort. Ich werde mich mal daran versuchen.
Viele Grüße
Eleve
Antwort 3 von oliverV
Hi,
die Alternative wäre evtl. ein kleines Pop-Up-Formular anstatt einer Inputbox.
Gruß
Oliver
die Alternative wäre evtl. ein kleines Pop-Up-Formular anstatt einer Inputbox.
Gruß
Oliver
Antwort 4 von Eleve
Hallo oliverV
danke für die Anregung.
Manchmal ist die offensichtlichste Lösung das was man partout nicht sieht.
Ich werds wohl so umsetzen.
viele Grüße
Eleve
danke für die Anregung.
Manchmal ist die offensichtlichste Lösung das was man partout nicht sieht.
Ich werds wohl so umsetzen.
viele Grüße
Eleve