Ok. Give more details, what do you exactly want to delay. Delay execution in a form? Delay execution in a class module and have still responsive UI? Delay the time before user can press a specific button but can press other buttons? Or what kind of scenario you have?
Public Class MyUtils
Shared Sub Wait(ByVal numSeconds As Long)
For i = 1 To numSeconds