vb.net - Visual Basic 控制台应用程序只循环一次

Question

对这里的一切都是新的，当我发现我的程序只循环一次时，我正在玩弄 VB 2012。帮助将不胜感激。

Module Module1
    Dim i As Integer = 0

    Sub Main()
        While i < 3
            i = i + 1
            Console.WriteLine(i)
            Console.ReadLine()
        End While
        End
    End Sub
End Module

编辑：是的，这里的人是对的，用那个代码是不可能的，所以我搞砸了一点，想出了一个解决方案

Module Module1
    Dim i As Integer = 0
    Sub Main()
        While i < 3
            i = i + 1
            Console.WriteLine(i)
            System.Threading.Thread.Sleep(1000)
        End While
    End Sub
End Module

Answer 1

你为什么要多加End？你确定这不是罪魁祸首。

While i < 3
    i = i + 1
    Console.WriteLine(i)
    Console.ReadLine()
End While
End  <-- not required.