说明:VB如何将列表项添加到类中.-

Question

不熟悉VB如何在类项中添加到列表中?

public class Demo
public Property Id as Integer
public RevsList as List (of ProjectItem)
end Class
public class ProjectItem
public Property Rev as Integer
public Title as string
end Class

用代码我尝试添加一个项目到Revslist

Dim revision as new Demo With {.id = 1}
revision.RevsList.Add(new ProjectItem() With {.Rev =33, .Title="description"})  '<= what is the correct syntax todo this

如何在这样的列表中添加一项呢?

Answer 1

在标题变量....前漏了一个分隔符和一个点

Dim revision as new Demo With {.id = 1}
revision.RevsList.Add(new ProjectItem() With {.rev =33, .title="description"})

我还注意到你在演示类中声明了RevsList，但没有初始化它。您可以在演示类中使用New关键字:

public class Demo
public Property Id as Integer
public RevsList as New List (of ProjectItem)
end Class

或者您可以在添加任何内容之前执行此操作:

Dim revision as new Demo With {.id = 1}
revision.RevsList = New List(of ProjectItem)
revision.RevsList.Add(new ProjectItem() With {.Rev =33, .Title="description"})

编辑如果仍然有问题，请在添加项目之前尝试创建项目。它有点冗长，但可以说更容易阅读:

Dim revision As New Demo
revision.Id = 1
Dim NewProjectItem As New ProjectItem
NewProjectItem.Rev = 33
NewProjectItem.Title = "description"
revision.RevsList.Add(NewProjectItem)