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,

Leave a Reply

Your email address will not be published. Required fields are marked *


*

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>