Wenn du folgende Zeile einfügst:

Config Date = Dmy , Separator = -

dann ist dein angegebenes Format das Datumsformat im Programm.
Nun kannst du die SysDay(str) Funktion benutzen, um die beiden Datumswerte in ein fortlaufendes Systemdatum umzuwandeln. Diese kannst du dann vergleichen

Config Clock = Soft
Config Date = Dmy , Separator = -
Dim Datum1 As Long , Datum2 As Long , Datum3 As Long
Dim Strdate As String * 10
Strdate = "01-05-09"
Datum1 = Sysday(strdate)
Strdate = "02-04-09"
Datum2 = Sysday(strdate)
Strdate = "01-05-10"
Datum3 = Sysday(strdate )

If Datum1 > Datum2 Then Print "test1"
If Datum2 > Datum3 Then Print "test2"

Gruß

Rolf