Usare gli eventi in VB.NET

In VB.NET attraverso gli eventi possiamo notificare gli utenti all'esecuzione di determinate operazioni.

In questo articolo vediamo un esempio in cui simuliamo la creazione di un ordine e scateniamo due eventi che abbiamo precedentemente sottoscritto.

Non ci servono librerie esterne.

Inoltre per semplicità ho messo tutto insieme:

Imports System
Imports System.Linq
Imports System.Threading.Tasks

Module Program
    Public Delegate Sub MyNotificationHandler(ByVal msg As String)

    Sub Main(args As String())
        Dim os As OrdiniService = New OrdiniService()
        Dim ns As NotificationService = New NotificationService()
        AddHandler os.CreazioneOrdine, AddressOf ns.Notifica1
        AddHandler os.CreazioneOrdine, AddressOf ns.Notifica2
        os.CreaOrdine("OR1")
    End Sub

    Public Class OrdiniService
        Public Event CreazioneOrdine As MyNotificationHandler

        Public Sub CreaOrdine(ByVal orderId As String)
            Console.WriteLine("Ordine creato: " & orderId)
            RaiseEvent CreazioneOrdine($"Ordine {orderId} creato")
        End Sub
    End Class

    Public Class NotificationService
        Public Sub Notifica1(ByVal msg As String)
            Console.WriteLine("Notifica 1: " & msg)
        End Sub

        Public Sub Notifica2(ByVal msg As String)
            Console.WriteLine("Notifica 2: " & msg)
        End Sub
    End Class

End Module

Noi ci limitiamo a stampare in console, considerate che magari li ci mettete l'invio di una email, sms, ecc.

Enjoy!