[Coder-san]

Code:

Dim HelloWorld As String = "Hello World!"
For intI As Integer = 0 To HelloWorld.Length - 1
    Console.WriteLine(HelloWorld.Substring(intI,1))
    Threading.Thread.Sleep(500)
Next
Console.ReadLine