Вы можете выполнять встроенные анонимные функции / подпрограммы с синтаксисом, например:
Manager.Customers.ExecuteAsync( Sub (op)
If op.CompletedSuccessfully Then
...
Else
...
EndIf
End Sub )
Иногда, когда вы используете его в строке, все становится действительно неестественно, поэтому, когда это происходит, я даю имя локальной функции / функции:
Dim SomeFun as Action(Of OpType) = Sub (op)
...
End Sub
Это хорошо работает, потому что вы все еще можете закрыть свою лексическую среду.
Это все из памяти - у меня дома нет VS (и я стараюсь не троллить ТАК на работе). В частности, я не уверен, что у меня есть закрывающая пара в нужном месте.
MSDN Ссылка