Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: FORMAT как то так Public Property Get TransferToRussianFormat(dtMyDate) As String Select Case CLng(dtMyDate) Case Is > 0 TransferToRussianFormat = Format(CDate(dtMyDate), "dd.mmm.yyyy") Case Else MsgBox ("Задайте дату") End Select End Property
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.