如何从 vb.net 中的对象数组元素构建一个新数组？答案

【问题标题】：How can i build a new array from object array elements in vb.net?如何从 vb.net 中的对象数组元素构建一个新数组？
【发布时间】：2012-08-23 19:48:44
【问题描述】：

我正在使用vb.net 我有以下对象数组，我希望从中提取所有真实值并为其命名并将其添加到数组中这是对象数组

这是我迄今为止尝试过的：

  Dim myarray() As String
        Dim number As Integer = 0
        If resultArray(0).BolComment Then

            myarray(number) = "comment"
            number = number + 1
        End If
        If resultArray(0).BolComplete Then

            myarray(number) = "complete"
            number = number + 1
        End If
        If resultArray(0).BolFinished Then

            myarray(number) = "Finished"
            number = number + 1
        End If
        If resultArray(0).BolOutCome Then

            myarray(number) = "OutCome"
            number = number + 1
        End If
        If resultArray(0).BolStatred Then

            myarray(number) = "Started"
            number = number + 1
        End If
        If resultArray(0).BolUser Then

            myarray(number) = "User"
            number = number + 1
        End If

这给了我一个错误：该变量之前已经使用过

问题如何将所有具有true 值和push 的项目提取到一个新数组with 给它一个新的name 谢谢

【问题讨论】：

有什么理由不使用List(Of String)？它将使您的代码显着简化...
说实话我不知道该怎么做...谢谢
哪一行报错了？你知道你有 resultArray(x) 和 resultArray(0) 吗？
@Blam 我改变它来说明
我没有看到任何变化。哪一行抛出错误？

标签： asp.net .net vb.net arrays

【解决方案1】：

我认为您的问题是您没有将数组初始化为特定大小，也没有在每次添加新项目时重新调整大小。但是，最好只使用List(T) 类：

Dim list As New List(Of String)()
If resultArray(x).BolComment Then
    list.Add("comment")
End If
If resultArray(0).BolComplete Then
    list.Add("complete")
End If
If resultArray(0).BolFinished Then
    list.Add("Finished")
End If
If resultArray(0).BolOutCome Then
    list.Add("OutCome")
End If
If resultArray(0).BolStatred Then
    list.Add("Started")
End If
If resultArray(0).BolUser Then
    list.Add("User")
End If

然后，如果您需要它作为实际数组，请执行以下操作：

Dim myarray() As String = list.ToArray()

【讨论】：