初始化自定义类中的数组或字符串的属性



我尝试了很多不同的方法,但似乎找不到正确的语法来初始化这个字符串数组。

我有一个自定义类

Public Class datahere
    Public Property Name As String
    Public Property parameters() As String
    Public Property elem As XElement
End Class

我这样申报

Dim xdata(newdata.Count) As datahere

但不知道如何使用它。我使用其他变量,比如

xdata(3).Name = "TEST"

这样尝试。。

像这样的第一次更改

Public Property parameters As List(Of String)

并创建阵列类

Dim ListDH as List(Of DataHere)
Dim par as New Parameter
par.Add("Any value")
Dim DH as New DataHere
DH.Name = "Test"
DH.Parameter = par
DH.Property = ....
ListDH.Add(DH)

所以你可以通过访问

ListDH(0).Name          '-----> to get Name of first array ("TEST")
ListDH(0).Parameter(0)  '-----> to get First array of Parameter from the list ("Any value")

尽管我建议您的Parameters属性使用List(字符串),但如果您坚持使用数组,您可以执行以下操作。

首先将参数属性更改为以下内容:

Public Property parameters As String()

请记住,xdata(3).parameters(0)将是零。要改变这一点,您需要指定数组中的项目数量,如下所示:

ReDim xdata(3).parameters(0)
'Give it a value
xdata(3).parameters(0) = "Test 1"

如果要添加其他项,则必须重新定义数组。为了防止丢失现有数据,请使用保留关键字:

ReDim Preserve xdata(3).parameters(1)
'Give the second item in the array a value
xdata(3).parameters(1) = "Test 2"

获取您的价值是非常直接的:

Dim strSecondParameters As Strign = xdata(3).parameters(1)

最新更新