Arrays VB-在数组中指定字符串

我试图给逗号分隔字符串中的字符串赋值。 请参阅下面的错误代码

Dim newArray As String() = "M2-1_,IR,Pass,499V,>10G,5.0s"
results = Split(newArray, ",", -1, vbBinaryCompare)
Dim results1 As String = newArray(0)
Dim results2 As String = newArray(1)
Dim results3 As String = newArray(2)
ListBox1.Items.Add(results1)
ListBox1.Items.Add(results2)
ListBox1.Items.Add(results3)

我目前的结果是：

M    
2    
-

我想知道结果：

M2-1_
IR
Pass

---

谢谢

如果您只想要前3个：

  Dim newArray = "M2-1_,IR,Pass,499V,>10G,5.0s"
  Dim results() As String = newArray.Split(",")
  ListBox1.Items.Add(results1(0))
  ListBox1.Items.Add(results2(1))
  ListBox1.Items.Add(results3(2))

    Dim newArray As String = "M2 - 1_,IR,Pass,499V,>10G,5.0s"
    ListBox1.Items.AddRange(newArray.Split(",").Take(3).ToArray)

如果您想要所有这些：

    Dim newArray As String = "M2 - 1_,IR,Pass,499V,>10G,5.0s"
    ListBox1.Items.AddRange(newArray.Split(","))

---

如果在添加到列表框时索引到

结果

数组，则代码可以工作

Dim newArray As String = "M2-1_,IR,Pass,499V,>10G,5.0s"
Dim results() = Split(newArray, ",", -1, vbBinaryCompare)
ListBox1.Items.Add(results(0))
ListBox1.Items.Add(results(1))
ListBox1.Items.Add(results(2))