vb.net Подождите 1 секунду

Threading.Thread.Sleep(500)
Curious Cassowary