You need to change the Date/Time output Format to display both:
B4X:
DateTime.DateFormat="dd MMM yyyy"
Dim L As Long = DateTime.DateTimeParse("12 MAY 1920","02:00:00")
DateTime.DateFormat="dd MMM yyyy HH:mm:ss"
Log(DateTime.Date(L))
Edit Explaination:
The error is occurring because you are incorrectly parsing the date before passing it to DateTime.DateTimeParse.
DateTime.DateTimeParse requires 2 Strings
Try:
B4X:
DateTime.DateFormat="dd MMM yyyy"
Dim L As Long = DateTime.DateTimeParse("12 MAY 1920","02:00:00")
Log(DateTime.Date(L))
Log(DateTime.Time(L))
You need to change the Date/Time output Format to display both:
B4X:
DateTime.DateFormat="dd MMM yyyy"
Dim L As Long = DateTime.DateTimeParse("12 MAY 1920","02:00:00")
DateTime.DateFormat="dd MMM yyyy HH:mm:ss"
Log(DateTime.Date(L))