Hallo zusammen :D.

Ich hätte da mal eine Frage.

Quellcode um die Frage zu verdeutlich.

Private Sub Command1_Click()
Dim datum As String
Dim dautmausgabe As Variant

datum = Text1.Text
datumausgabe = DateSerial(Year(datum), Month(datum), 1)
lblDatumAusgabe.Caption = datumausgabe

End Sub

Wenn ich jetzt in das textfeld z.B 19. Oktober 1999 eingebe kommt typen unverträglich

Dim datum As String
Dim dautmausgabe As Variant

datum = "19. Oktober 1999"
datumausgabe = DateSerial(Year(datum), Month(datum), 1)
lblDatumAusgabe.Caption = datumausgabe

End Sub

Wenn ich es so mache funktionierts. Obwohl bei beiden die variable datum als string übergeben wird, funtkioniert nur die 2 Variante. Warum?

Freue mich über jede Wertvolle Antwort :D.

In welcher Zeile kommt denn die Fehlermeldung?

Naja, hab jetzt heute Morgen VB nochmal auf gemacht und den Quellcode nochmal ein gegeben.
Nun gehts mit beiden.... Beispielen :D. Ich hab ka warum.

Aber danke für deine Hilfer Marcus.

Klingt nach nem Tippfehler


mfG Andy