windows - 字符串中每个空格的 VB.NET Windows 窗体

Question

嘿，我有这个代码

Dim RandomNumber As New Random()
Dim msg As String = "My name is Nick from Neptune"
For each space as char in msg
msg = msg.replace(" ", RandomNumber.Next(0, 33))
Next

但它不起作用。有人能帮我吗？最后的字符串应该是这样的:

My12name455is22Nick88from66Neptune

提前致谢，抱歉我的英语不好。

Answer 1

我把它改成了工作，我很抱歉:

Option Infer On

Module Module1

Sub Main()
    Dim RandomNumber As New Random()
    Dim msg As String = "My name is Nick from Neptune"
    Dim newmessage As String = ""
    Dim d = msg.Split(" ").ToList()

    For Each t In d
        newmessage = newmessage & Convert.ToString(t) & RandomNumber.[Next](0, 33).ToString()
    Next

    Console.WriteLine(newmessage)
End Sub

结束模块