VB.net attendez 1 seconde

Threading.Thread.Sleep(500)
Curious Cassowary