-1

我有一个类人,具有 id、name、salary 属性。

class person
    friend id as long
    friend name as string
    friend salary as decimal
end class

我不想列出工资清单。

Dim pList as new list(of person)

pList 加载了 50 个条目

Dim SalaryList as new list(of decimal)
for each p as person in plist
    SalaryList.add(p.salary)
next

好的,这行得通。但是有没有办法做到这一点:

Dim SalaryList as list(of decimal) = pList(each).salary
4

1 回答 1

1

您可以使用Select投影:

Dim SalaryList = pList.Select(Function(p) p.salary).ToList()

或者

Dim SalaryList = From p in pList
                 Select p.salary

请注意,后者仅返回查询 ( IEnumerable(Of Decimal)) 而不是List. 如果您真的需要 a List,请调用ToList()查询,但通常没有必要。

于 2013-04-05T07:30:19.117 回答