Probleme mit Date

[Stefan Mettenbrink]

In RB 5.5 gibt es anscheinend ein Problem mit der Date-Klasse unter
Windows.

Ich habe das Beispiel aus der Onlinehilfe mal etwas angepasst:
 Dim theDate as New Date
 Dim theTrueBool as Boolean
 thetruebool=ParseDate("05.05.1605",theDate)
 If theTrueBool then
   MsgBox thedate.AbbreviatedDate
 else
   MsgBox "Invalid Date format!"
 end if

 thetruebool=ParseDate("05.05.1505",theDate)
 If theTrueBool then
   MsgBox thedate.AbbreviatedDate
 else
   MsgBox "Invalid Date format!"
 end if


Unter Mac Os kein Problem. Unter WIndows führen alle Datumsangaben vor
1601(?) zu einem "Invalid Date format!" :-(

Ist das in den neuen Versionen behoben?
Hat jemand eine Lösung für das Problem?

MfG, Metti.