0

如:

mylist.FindAll(Function(item) item.property = variable)

我问的原因是如果我使用这样的语法,我倾向于得到一个字符串到任何转换错误,这让我认为“变量”被逐字视为一个字符串。

谢谢。

4

1 回答 1

0

您可以使用匿名函数:

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  Dim lista As New List(Of My_Class)
  lista.Add(New My_Class With {.x = 1, .y = 0})
  For Each R In lista.FindAll(Function(V) V.x = 1)
      Debug.Print(R.y)
  Next
End Sub


End Class
Public Class My_Class
  Public x, y As Integer    
End Class
于 2010-06-30T16:32:50.450 回答