Nope, still the same error.
I will need to convert the DateTime.Date string to a long, so that I can use:
B4X:
Dim MyBookEnd As String
Dim Diff As Period
DateTime.DateFormat = "dd-MM-yyyy HH:mm:ss"
MyBookEnd = DateTime.Date(DateTime.Now)
Diff=DateUtils.PeriodBetween(MyBookEnd, Main.MyBookStart)