Lambdas EN VB

Como ya sabéis, una de las características que se han añadido son las expresiones Lambda, A pesar de existir cantidad de ejemplos, algunos me estáis pidiendo que os deje un par de ejemplos al estilo del blog.

Ahí van los típicos :

Module Module1

    Sub Main()
        Dim Numeros = {1, 2, 3, 4, 5, 6, 7, 8, 9, 0}

        Dim Pares = Numeros.Count(Function(n)
                                      Return (n Mod 2 = 0)
                                  End Function)
        Console.WriteLine("Numeros Pares : {0}", Pares)

        Dim esPar = Function(n)
                        If n Mod 2 = 0 Then Return "Si" Else Return "No"
                    End Function
        Console.WriteLine(esPar(2))

        Array.ForEach(Numeros, Sub(n)
                                   If (n Mod 2 = 0) Then Console.WriteLine(n)
                               End Sub)

        Console.ReadLine()
    End Sub

End Module

Saludos,

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *