AddressOf operator : AddressOf « Event « VB.Net Tutorial






Module Module1
    Delegate Sub GreetingMethod()

    Dim Greeting As New GreetingMethod(AddressOf MorningEnglish)

    Sub MorningEnglish()
        Console.WriteLine("Good morning")
    End Sub

    Sub AfternoonEnglish()
        Console.WriteLine("Good afternoon")
    End Sub

    Sub EveningEnglish()
        Console.WriteLine("Good evening")
    End Sub

    Sub MorningSpanish()
        Console.WriteLine("Buenas dias")
    End Sub

    Sub AfternoonSpanish()
        Console.WriteLine("Buenos tardes")
    End Sub

    Sub EveningSpanish()
        Console.WriteLine("Buenos noches")
    End Sub

    Sub Main()
        Greeting = AddressOf MorningEnglish
        Greeting = AddressOf AfternoonEnglish
        Greeting = AddressOf EveningEnglish
        Greeting = AddressOf MorningSpanish
        Greeting = AddressOf AfternoonSpanish
        Greeting = AddressOf EveningSpanish
        Greeting.Invoke()
    End Sub
End Module
Buenos noches








11.3.AddressOf
11.3.1.AddressOf operator
11.3.2.Use EventHandler with AddressOf
11.3.3.AddHandler and AddressOfAddHandler and AddressOf