如何修复我的代码以正确打印"Hello World!"

Question

我有一些代码需要修复才能打印"Hello World!".由于某种原因,它打印所有乱码的字母.

Sub Main()
    Dim s As String = "Hello World!"
    Parallel.For(0, s.Length, Sub(i)
                                Console.Write(s(i))
                              End Sub)
    Console.Read()
End Sub

有什么建议？

Answer 1

Sub Main()
    Console.Write("Hello World!")
End Sub

如果你真的必须一次打印一个字符,你可以写:

Sub Main()
    dim s as string = "Hello World!"
    dim i as integer
    for i=0 to s.length-1
        Console.Write(s(i))
    end for
End Sub

Answer 2

并行执行的全部要点是它们是并行完成的,而不是顺序完成的.并行执行对此任务没有意义,因为顺序非常重要.

通过异步/并行执行,每个任务被拆分为与其他任务并行运行,并且不会等待任何先前的任务完成.在您的情况下,一些后来排队的任务在排队之前完成,然后以看似随机的顺序重新排序这些字母.