Подскажите пожалуйста, как программно сделать задержку ровно на 4 секунды - очень нужно. Знаю есть такая функция Delay, только она у меня почемуто не хочет работать!
:-)

Спасибо за функцию Sleep.
To: RVI, а как пользоваться таймером?

P.S. Да, на счет "задержки" нехорошо получилось, надо было топик назвать "как выждать 4 секунды" :-)

Спасибо большое за ответы, но у меня еще в связи с таймером возник вопрос:
У меня на процедуре обработки событий уже стоит один таймер,
Start <= 0 Then
If Start <= N * -1 Then
GoTo ex
Else
If Me![z1].Width - s <= 0 Then GoTo ex
Me![z1].Width = Me![z1].Width - s
GoTo prod
End If
End If
Me![z1].Left = Start
Start = Start - s
GoTo prod
ex: Me![z1].Visible = False
Me![z1].Visible = True
Start = N
Me![z1].Width = begL
prod: If pr = True Then
If Start1 <= 2000 Then GoTo ex1
Me![z2].Left = Start1
Start1 = Start1 - s1
GoTo Finish
Else
GoTo 2
End If
ex1: Me![z2].Visible = False
Me![z2].Visible = True
pr = False
Me![z2].ForeColor = 255
Start1 = 2000
2: If Start1 >= N1 Then GoTo ex2
Me![z2].Left = Start1
Start1 = Start1 + s1
GoTo Finish
ex2: Me![z2].Visible = False
Me![z2].Visible = True
pr = True
Me![z2].ForeColor = 16711680
Start1 = N1
Finish:
Он осуществляет бесконечный цикл,
а мне надо таймером в 4 сек. выждать и закрыть форму, а если еще поставлю на таймер:
Dim t As Single
t = Timer
Do Until Timer > t + 4
Loop
то два таймера работают совместно.
Подскажите пожалуйста, как быть?

Так вопрос именно в этом и заключался, куда вставить таймер с задержкой 4 сек, чтобы после его выполнения написать
DoCmd.Close
и форма закрылась бы.
Я понимаю, что нельзя его поставить в Timer, а куда его тогда поставить?

После открытия формы - идет задержка в 4 сек, а потом форма закрывается.
(На Open задержку повесить не получается, т.к. Access ждет 4 сек, а потом открыват форму, на Load - тоже, а на какое событие тогда можно повесить - не знаю).

Внутрь какого цикла и куда?

Спасибо, но это не то!
Форма открывается, ждет 4 сек, а потом запускается Timer (большой).
А мне надо наоборот, чтобы большой Timer выполнялся 4 сек.
:-)