Afficher un code d'erreur [Résolu]

Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010
- - Dernière réponse : lediablo
Messages postés
215
Date d'inscription
mercredi 26 avril 2006
Statut
Membre
Dernière intervention
2 août 2012
- 11 mai 2010 à 19:13
slt tt le monde,

j'essaye d'afficher un code d'erreur avec le code suivant:

msgbox err.number

mais quand je fais le test sur ce code il me dis que ce code n'existe pas

je voulais savoir est ce que c'est le vrai code d'erreur qu'est affiché ou le compilateur fais une conversion implicite quand je l'affiche???


Merci d'avance
Afficher la suite 

6 réponses

Meilleure réponse
Messages postés
215
Date d'inscription
mercredi 26 avril 2006
Statut
Membre
Dernière intervention
2 août 2012
3
Merci
c'est le numéro d'erreur que tu a "-754465***" tu peut faire ta comparaison c'est quoi le problème

Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 205 internautes nous ont dit merci ce mois-ci

Commenter la réponse de lediablo
Messages postés
215
Date d'inscription
mercredi 26 avril 2006
Statut
Membre
Dernière intervention
2 août 2012
0
Merci
bonjour
un exemple vite fait
Private Sub Command1_Click()
On Error GoTo monerreur
a = 0 + "b"
Exit Sub
monerreur:
MsgBox Err.Number & " " & Err.Description
End Sub


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)
Commenter la réponse de lediablo
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010
0
Merci
oui c bien ce que j'ai fais mais le numero d'erreur affiché n'est pas valide il m'affiche un numero de genre "-74........."

j'ai besoin de ce code pour faire un test de ce type


if err.number=numero then
....
end if
Commenter la réponse de mido105
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010
0
Merci
ca marche merci pour ton aide
Commenter la réponse de mido105
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
11
0
Merci
C'est pas vraiment fait pour être affiché en décimal mais en hexa :
Private Sub Command1_Click()
 On Error GoTo monerreur
 Dim A As Long, B As Long
 B = 17
 A = B/A 'division par zéro
 Exit Sub
monerreur:
 MsgBox "Erreur n°" & Err.Number & " (0x" & Hex(Err.Number) & ") :" & vbCrlf & Err.Description
End Sub

---
VB.NET is good ... VB6 is better
Commenter la réponse de cs_ghuysmans99
Messages postés
215
Date d'inscription
mercredi 26 avril 2006
Statut
Membre
Dernière intervention
2 août 2012
0
Merci
merci pour l'info ghuysmans99


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)
Commenter la réponse de lediablo