Discussion :

[lakhdar16]

Bonjour,

svp quel est l'équivalant de ErrorProvider (vb.net) sous VBA et qui sert à afficher un panneau d'erreur et un message d'aide court.
Exemple: une zone TextBox doit permettre de saisir une valeur numérique. si cela n'est pas le cas et qu'on tente de
sortir du textbox ou de fermer la fenêtre, le panneau (!) s'affiche , et on ne peut pas sortir le focus du textbox.
Si on survole le panneau(!) cela affiche le message.
comment utilise on l'évènement Validating du textBox qui est déclenché quand on tente de sortir?, et si le texte n'est pas
numérique, on donne le message au ErrorProvider et on annule la sortie

merci pour votre aide.

[Invité]

Bonjour
Cela ne marche pas tout à fait pareil.
Déjà si ta zone de texte à comme source le champ d'une table qui est défini en numérique, Access enverra automatiquement un message d'erreur.

Sinon sur l'évènement avant Mise A Jour de ta zone tu peux faire quelque chose de ce style:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub NomDeTaZone_BeforeUpdate(Cancel As Integer)
  If IsNumeric(Me.NomDeTaZone.Value) = False Then
    Call MsgBox("Vous devez saisir une valeur numérique.", vbExclamation,   "Attention")
    Me.NomDeTaZone.SetFocus
  Else
  End If
End Sub