нить сна VB

Imports System.Threading

Tread.Sleep(1000)
Salty Joe