如何添加一个简单数组在vb.net

Question

如果我有

Dim a As String() = ("One,Two").Split(",")

我怎样才能添加到字符串？

Answer 1

最简单的方法是将其转换为列表然后添加。如果你真的想保留一个数组，

Dim a As String() = ("One,Two").Split(",") 
    Dim b as List(Of String) = a.ToList 
    b.Add("Three") 
    a=b.ToArray 

这里是一些真正的外箱：

a = (String.Join(",", a) & ",Three").Split(",") 

Answer 2

一种不同的方法，尝试：

Dim a As String() = ("One,Two").Split(CChar(",")) 
Debug.Print(CStr(UBound(a))) 
ReDim Preserve a(9) 
Debug.Print(CStr(UBound(a))) 

输出到即时窗口是：

1 
9 

注：我不得不稍微更改原始行，因为我总是使用Option Strict On，这不允许隐式转换。