在新行上显示数组的每个元素

Question

在尝试阅读和回答我的问题时，请考虑我是VB.NET的新手

我有一个文本框，其中包含在同一行上用逗号分隔的单词列表。单击按钮时，字符串将分配给变量文本，然后我将其拆分为变量arrayText。 然后我循环它并在新行上显示数组的每个元素。

我的代码如下

 Dim text As String
 Dim arrayText() As String

    text = TextBox1.Text
    arrayText = text.Split(",") 'every "," generates new array index, removes ","

    text = ""

    For i = 0 To arrayText.Length Step 1
        text = arrayText(i) & vbCrLf
        MsgBox(text)
    Next

调试时我得到错误消息数组越界，但是当我删除换行符（vbCrLf）时，它会在消息框中逐字显示我的文本（我用于调试）和循环结束时它会发出相同的错误消息。

我在这里做错了什么，有什么改进建议吗？

Answer 1

虽然walther答案是对的，但我建议您使用List(Of String)和For Each...Next循环。

列表更“现代”，并且大多数时候它比vb.net中的数组更受欢迎。您可以使用Environment.NewLine代替vbCrLf。我不确定你究竟想做什么，但我不认为使用MsgBox是呈现单词的最佳方式。以下是我认为您应该做的一个简单示例：

' Hold the text from the text box.
Dim FullText As String = TextBox1.Text
Dim SeperatedWords As New List(Of String)
' ToList function converts the array to a list.
SeperatedWords = FullText.Split(",").ToList
' Reset the text for re-presentation.
FullText = ""
' Goes through all the seperated words and assign them to FullText with a new line.
For Each Word As String In SeperatedWords
    FullText = FullText & Word & Environment.NewLine
Next
' Present the new list in the text box.
TextBox1.Text = FullText

Answer 2

For i = 0 To arrayText.Length - 1 Step 1

最后一个元素的索引为length of array - 1。