TimeRange Методы
InRange(Value as DateTime) as Boolean
Возвращает True, если дата, определенная параметром Value находится в диапазоне объекта TimeRange.