Option Explicit
Event Intervient(ByVal Tic As Long)
Public Sub MéthodeNonRéservée(ByVal Tic As Long)
' Dans ce schéma, elle n'est pas réservée à un module de service, puisqu'elle est invoquée
' dans un UserForm utilisateur. Je fais toujours une grande distinction de couches entre les
' outils que forme la programmation de service et la programmation applicative qui s'en sert.
' Mes modules de classe étant toujours des modules de service, les commentaires y sont
' des guides d'utilisation pour le programmeur d'application qui veut les utiliser.
' Alors quand je mets "NE PAS UTILISER", ça sous-entend: par lui même.
RaiseEvent Intervient(Tic)
End Sub