Message d'erreur "argument ou appel de procedure incorrect"

fred - 21 mai 2001 à 19:07
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 - 10 août 2007 à 09:02
message d'erreur "argument ou appel de procedure incorrect"
explication du prblème
'-----------------------------
'la premiere zone de saisie
'-----------------------------
private sub Matricule_lostfocus()
' mat c'est un mask edit box
If InStr(mat.Text, " ") <> 0 Or InStr(mat.Text, "_") Then
MsgBox "matricule non valide"
mat.SetFocus
mat.SelStart = 0
mat.SelLength = 6
Else
txtnom.setfocus
End If
End sub
'-----------------------------
'la 2ème zone de saisie
'------------------------------
private sub nom_lostfocus()
If Trim(txtnom.Text) = "" Then
MsgBox " tu doit remplir le nom du candidat"
txtnom.SelStart = 0
txtnom.SelLength = 18
txtnom.SetFocus
End If
txtnom.Text = Trim(txtnom.Text)
End sub

si je tappe moin de 6 chiffres ou je laisse la zone mat.text vide le message d'erreur s'affiche [MsgBox "matricule non valide"]
mais avant ca un autre message s'affiche "argument ou appel de procedure incorrect"
le curseur ne reste pas dans la zone mat.text mais il passe a la 2ème zone puis le programme fait un exit
il faut noté que en mode creation l'exemple s'exécute convenablement mais si en crée un executable le problème se pose .
merci pour tout ce qui pense a mon problème

1 réponse

cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 9
10 août 2007 à 09:02
Cette discussion a été cloturée. Veuillez lancer une nouvelle discussion si votre question est toujours d'actualite.

Merci
Rejoignez-nous