VB.NET 换行拆分（C# 转换）

Question

我正在尝试将此代码从 C# 转换为 VB.NET

string[] lines = theText.Split(new string[] { "\r\n", "\n" }, StringSplitOptions.None);

这是我所拥有的，问题是它打印消息框中的整个文本框内容，而不是每一行。

    Dim Excluded() As String

    Dim arg() As String = {"\r\n", "\n"}

    Excluded = txtExclude.Text.Split(arg, StringSplitOptions.None)

    For i As Integer = 0 To Excluded.GetUpperBound(0)
        MessageBox.Show("'" & Excluded(i) & "'")
    Next

Answer 1

不能使用反斜杠 (\) 来转义 VB 中的字符。使用 ControlChars 类：

Dim arg() As String = { ControlChars.CrLf, ControlChars.Lf }

Answer 2

就字符串文字而言，转义序列实际上并不存在于 VB .Net 中。

您可以使用 2 个特殊常量来代替：

vbCrLf
vbLf

Dim Excluded() As String

Dim arg() As String = {vbCrLf, vbLf}

Excluded = txtExclude.Text.Split(arg, StringSplitOptions.None)

For i As Integer = 0 To Excluded.GetUpperBound(0)
    MessageBox.Show("'" & Excluded(i) & "'")
Next

应该可以解决问题（尽管未经测试）。

Answer 3

来自 在线转换器：

您的 C# 代码：

string[ ]lines = theText.Split(new string[] { "\r\n", "\n" }, StringSplitOptions.None);

转换为 VB.NET:

Dim lines As String() = theText.Split(New String() {vbCr & vbLf, vbLf}, StringSplitOptions.None)