ich habe in einer UF mehrere Textboxen die in Datumsformat erscheinen sollen.
Der User soll nur die Zahlen, ohne Komma, eingeben können und die Ausgabe soll im Datumsformat erfolgen.
z. B. Eingabe 22052017-->Ausgabe 22.05.2017(TT.MM.JJJJ) und im Idealfall soll ich später mit den Werten rechnen können. (z. B. Alter)
Mit dem u.a. Code konnte habe ich leider kein Erfolg gehabt:
Private Sub TextBox1_AfterUpdate()
TextBox1 = Format(TextBox1, "dd.mm.yyyy")
End Sub
Könnt Ihr mir bitte Tipps geben wie ich das Problem lösen kann?Muss ich den Textbox initilasieren, wenn ja, wie?
Welches Ereignis muss ich anwenden? (Change, AfterUpdate....?)
PS:DTP will ich nicht benutzen, da die Eingabe im Textbox schneller erfolgt.
Gruß, Naki