Question

我需要创建一个字符串数组数组。例如：

> Array(0) = {"1", "a", "e"} 

> Array(1) = {"word", "at", "war"} 

> ...

我做了：

Dim array()() As String

For i = 0 to 10
    array(i) = New String() {"dfdd", "dda", "aa", "bnb", "3", "ghj", "ht"}
Next i

但它失败了例外：

对象引用未设置为对象的实例。

Answer 1

这是因为您的数组的第一个维度未初始化。

    Dim array(10)() As String

    For i = 0 To 10
        array(i) = New String() {"dfdd", "dda", "aa", "bnb", "3", "ghj", "ht"}
    Next I

我建议你查看List，如果每个字符串确定不同的属性，可能会创建一个类。

Answer 2

你可以这样做：

Dim array = Enumerable _
    .Range(0, 10) _
    .Select(Function (n) New String() {"dfdd", "dda", "aa", "bnb", "3", "ghj", "ht"}) _
    .ToArray()

Answer 3

Public Function ArrayToSV(ByVal array() As Object, ByVal seperator As Char) As String
    Dim i As Integer
    Dim tmpstr As String
    tmpstr = CStr(array(LBound(array)))
    For i = LBound(array) + 1 To UBound(array)
        tmpstr = tmpstr & seperator & CStr(array(i))
    Next
    Return tmpstr
End Function

此方法将为您提供所需的结果，提供一个对象数组和分隔符，它将返回一个字符串。

如何创建String Arrays数组

3 个答案: