Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Кабан а без .Value пробовали? или так
Public Function nz(a, b) If IsNull(a) Then nz = b ElseIf Len(CStr(a)) = 0 Then nz = b Else nz = a End If End Function '-- вызов, например так CmpDate CDate(nz(Tim1.Value,"01.04.2008")), CDate(nz(Tim2.Value,"01.04.2008"))
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.