Есть ли в VB.NET анонимные функции?

Question

Судя по тому, что я могу найти в Google, VB.NET имеет только лямбда-выражения с одним оператором, а не анонимные функции с несколькими операторами.Однако во всех статьях, которые я читал, говорилось о старых версиях VB.NET, я не смог найти ничего более свежего, чем vs2008 beta 1 или 2.

Итак, вопрос:Как я могу это сделать в VB.NET?

Код С#:

private void HandleErrors( Action codeBlock ){
    try{
        codeBlock();
    }catch(Exception e){
        //log exception, etc
    }
}

HandleErrors(() => {
    var x = foo();
    x.DoStuff();
    etc
});

Answer 1

Это происходит в VB10:

Dim food = New With {
    .ID = 1,
    .Name = "Carrot",
    .Type = (
        Function(name As String)
            If String.IsNullOrEmpty(name) Then Return String.Empty

            Select Case name.ToLower()
                Case "apple", "tomato": Return "Fruit"
                Case "potato": Return "Vegetable"
            End Select

            Return "Meat"
        End Function
    )(.Name)
}
Dim type = food.Type

Answer 2

Visual Basic .NET имеет только лямбда-выражения.

Он не поддерживает «анонимных делегатов» в текущей версии, хотя в VS2010 он будет (причем в нескольких строках).

На данный момент единственный вариант — объявить где-нибудь свой метод и передать его с помощью оператора Addressof.

Answer 3

В VB9 есть только однострочные анонимные функции.Мы добавляем полные операторы и многострочные лямбды в VB10.

Answer 4

в этом примере у меня есть список операций, но я хочу найти только одну из списка (из T), в котором идентификаторы совпадают:

Return operations.Find(Function(p) p.OperationID = operationID)

OperationID — это локальная переменная, передаваемая в метод, а Operations — это общий список.

Answer 5

Анонимный не делегат или функция, это сильный динамический тип

вы можете использовать общие функции

Sub Main()
      Dim PersonDynamicType = AnonyFunc(New With {.Name = "david", .Family = "Fisher"})
      Console.Write(PersonDynamicType.Name)
End Sub

Function AnonyFunc(Of t)(v As t) As t
      Return v
End Function

Answer 6

Это неточно.В VB.NET действительно есть анонимные методы.Вот пример:

Private Function JsonToObject(Of T)(Value As String) As T
    Dim JavaScriptSerializer As New System.Web.Script.Serialization.JavaScriptSerializer()
    Return JavaScriptSerializer.Deserialize(Of T)(Value)
End Function

Dim People As Generic.List(Of Person) = JsonToObject(Of Generic.List(Of Person))(Json)