VB - 在數組中分配字符串

Question

我想在逗號分隔的字符串中給字符串賦值。 請參閱下面的錯誤代碼。

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 

謝謝!!!!!

Answer 1

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)) 

Answer 2

如果你想只是第3：

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(",")) 

Answer 3

你的代碼的工作，如果你索引到results陣列。

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))