取得 Variant Date 之純日期
傳回 Variant Date (Real*8)
dDate = MyGetDateTime('2004/1/13 13:45:12') Write(*,*) MyGetDate(dDate)
Intel Visual Fortran 7.0 以後 | wVariant.f90
winVariant 函式庫 | MyGetDateTime