Question

我正在尝试做类似的事情：

Sub abcd(s as string)
    listofstuff.find(address of xyz(s))

    ...
End sub

Private Function xyz(th as thing, str as string)
    If th.getName = str Then
        Return True
    Else
        Return False
    End If
End Function

我遇到的问题是它不会让我传入一个字符串。在MSDN上，他们展示了一种方法，可以通过让变量位于sub之外作为类的一部分来完成我想要完成的任务，但我想知道是否有可能避免这样做。

Answer 1

lambda查询怎么样？

一场比赛：

Dim query = listofstuff.Where(Function(o) o.getName = s).FirstOrDefault
If query IsNot Nothing Then
  'something found
End If

所有比赛：

Dim query = listofstuff.Where(Function(o) o.getName = s).ToList
If query.Count > 0 Then
  'something found
End If

list（of t）.find（addressOf t）如何传递参数？

1 个答案: