Используйте лямбда-выражение для передачи второго параметра:
Res = LBaseConnections.FindAll(Function(con) ConnectionFromMatch(con, ClassGuid))
РЕДАКТИРОВАТЬ, чтобы ответить на ваш комментарий:
FindAll
занимает Predicate(Of T)
(Predicate(Of PropertyConnection)
в вашем случае), поэтому вы не можете передать ему ConMatchDelegate
, так как подпись несовместима. Поэтому я создаю Predicate(Of PropertyConnection)
, используя анонимный метод. Это, вероятно, будет более понятно:
Dim filter As Predicate(Of PropertyConnection) = Function(con) ConnectionFromMatch(con, ClassGuid)
Res = LBaseConnections.FindAll(filter)