如何在vb.net中找到最接近0的值

Question

＆＃39;我有这个：

Dim ListOfhold As New List(Of Integer)

Dim hold1 as integer = a1 - b1
Dim hold2 as integer = a1 - b2
Dim hold3 as integer = a1 - b3
Dim hold4 as integer = a1 - b4
Dim hold5 as integer = a1 - b5

＆＃39;例如，hold1到hold5的值为：

16
22
-10
5
42

ListOfhold.add(hold1)
ListOfhold.add(hold2)
ListOfhold.add(hold3)
ListOfhold.add(hold4)
ListOfhold.add(hold5)

＆＃39;我可以使用ListOfhold.sort()

对其进行排序

＆＃39;但我不知道这些值中哪一个最接近0（仅限正数）

＆＃39;你可以帮助这个noobie吗？

Answer 1

VB版
Dim result = ListOfhold.Where(Function(x) x > 0).Sort()

C＃版
var result = ListOfhold.Where(x => x > 0 ).Sort();

您可以使用Where扩展名方法过滤列表中小于零的所有数字，然后应用Sort函数。