В этом примере функция CDate используется для преобразования строки в тип Date. На практике не
рекомендуется определять в тексте программы дату и время в виде строк (как показано в этом примере).
Вместо этого пользуйтесь литералами даты и времени, например #2/12/1969# и #4:45:23 PM#.
Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "12 февраля 1969 г."
' Преобразование в тип данных Date.
MyShortDate = CDate(MyDate)
MyTime = "4:35:47 PM"
' Преобразование в тип данных Date.
MyShortTime = CDate(MyTime)
|