de capture d'évènements du module

Question

je fonction pour envoyer e-mail dans un module où je l'ai déclaré mon événement personnalisé:

Public Module myModule 
    Public Event emailCompleted() 

Dans ce module, j'ai fonction qui sont déclenchées lorsque l'envoi d'email est terminée:

Private Sub SendCompletedCallback(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) 
    If e.Error Is Nothing Then 
     RaiseEvent emailCompleted() 
    End If 
End Sub 

Tout cela fonctionne bien, comme prévu.

Le problème est que je ne sais pas comment attraper cet événement dans mon programme principal qui appelle la fonction sendemail.
Comment faire cela?

Answer 1

Vous ne pouvez déclencher des événements à l'intérieur d'une classe et les traiter en dehors de cette classe:

Public Class myModule 
    Public Event emailCompleted() 
    Private Sub SendCompletedCallback(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) 
     If e.Error Is Nothing Then 
      RaiseEvent emailCompleted() 
     End If 
    End Sub 

et dans votre module de code d'appel:

dim WithEvents myModuleObject as MyModule 

Sub HandleEvent() Handles myModuleObject.emailCompleted 
...