Скрыть календарь

Витал
Дата: 07.06.2004 15:51:25
Думал простая задачка - всего лишь скрыть календарь на событие "потеря фокуса". Ан нет!! "Невозможно сделать невидимым ЭУ имеющий фокус!" И ч.д.?

Попробовал и на Выход - тоже самое.

Private Sub Calendar1_Exit(Cancel As Integer)
   With Me.Calendar1
       .OnLostFocus = True
       .Visible = False
   End With
End Sub 
EDUDK01
Дата: 07.06.2004 16:12:38
передать фокус другому элементу -> скрыть нужный элемент?
Витал
Дата: 07.06.2004 16:14:52
EDUDK01
Хм!! Подсунуть пользователю не то что он выбрал, а то что я запрограммировал?
EDUDK01
Дата: 07.06.2004 16:34:24
Зачем подсунуть, у тебя фокус на следующий контрол так и так должен попасть.
Витал
Дата: 07.06.2004 17:20:54
что ли я знаю какой следующий контрол юзер захочет выбрать? Совсем не обязательно должно выбираться следующее поле!