Evénement Change()

J'ai utilisé l'événement Change() pour garnir les différents objets qui affecteront la base de données.

Des objets étaient, parfois, affectés d'une valeur inattendue.

Comme les événements peuvent agir tout le temps, il faut savoir quand les événements sont indispensables.

Alors, j'ai mis des variables booléennes pour empêcher les événements Change() d'agir à certains moments.

Exemple 1	Exemple 2
Private Sub Form_Load() ... End Sub	Private Sub Form_Load() mCancel = False End Sub
Private Sub cmdOk_Click() txtName = "" End sub	Private Sub cmdOk_Click() If mCancel = True txtName = "" End if End sub
Private Sub txtName_Change() ... End Sub	Private Sub txtName_Change() ... End Sub
Dans cet exemple, l'événement Change() a agit	Dans cet exemple, l'événement Change() n'a pas agit grâce à l'indicateur