Ещё один вариант реализации функции паузы (задержки) в Visual Basic, с использованием системного таймера, Timer- количество секунд прошедших с полуночи, если вам нужны паузы в программах меньше суток, можете воспользоваться следующей функцией

Sub Pause(S As Integer)

Sec = Timer

d:

If Sec = Timer - S Then GoTo f Else GoTo d:

f:

End Sub

Для тех, кто не знает, вызывать её нужно так:

Pause (5) -для паузы в 5 секунд

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