VB 2010: Effectuer la même action pour toutes les erreurs

Fermé
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 - Modifié par Anonyme209 le 23/05/2014 à 14:50
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 - 8 juin 2014 à 12:08
Bonjour,

je programme en visual basic 2010, et mon application dispose de plein de fomrs différentes (et donc de plein de subs différents)
J'aimerais donc savoir s'il y a un moyen d'effectuer la même action pour toutes les erreurs, peu importe le sub (et la form) dans lequel elles sont survenues.

J'utilise actuellement le code suivant:

Private Sub test
On Error Goto erreur

(code du sub)
Exit Sub
erreur:
MsgBox("Une erreur est survenue. Le programme va fermer.")
End
End Sub


Le seul problème est qu'il faut taper ce code dans tous les subs, et que ça finit par être très long.

Merci pour votre aide.
A voir également:

13 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
25 mai 2014 à 09:29
MzTools le fait automatiquement
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
25 mai 2014 à 14:38
Bonjour,

merci pour votre réponse.
Pourriez-vous m'expliquer comment installer et utiliser MzTools?
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
25 mai 2014 à 19:30
Bonjour,

Voici le lien :
https://www.mztools.com/index.aspx
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
26 mai 2014 à 16:08
Bonjour,

merci pour le lien, mais j'étais déjà allé le voir.
J'ai téléchargé MzTools pour .NET, je l'ai installé, (version .NET et version MZ-Tools 3.0 for VBA) Je ne remarque aucun changement apparent dans microsoft visual basic. Peut-être n'ai-je pas téléchargé la bonne version de MzTools. Voici les informations de mon débogueur:

Microsoft Visual Studio 2010
Version 10.0.30319.1 RTMRel
Microsoft .NET Framework
Version 4.5.50938 RTMRel

Version installée : VB Express

Microsoft Visual Basic 2010 01012-169-2510015-70739
Microsoft Visual Basic 2010

Security Update for Microsoft Visual Basic 2010 Express - Français (KB2251489) KB2251489
This security update is for Microsoft Visual Basic 2010 Express - Français.
If you later install a more recent service pack, this security update will be uninstalled automatically.
For more information, visit https://support.microsoft.com/en-us/help/2251489/ms11-049-description-of-the-security-update-for-visual-studio-2010-jun

Merci de votre aide
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
26 mai 2014 à 16:17
Bonjour,

Une fois installé, tu devrais avoir des outils supplémentaires (un menu et une barre MZ Tools) avec notamment une commande "Ajouter une gestion d'erreur".
Tu peux personnaliser la gestion d'erreurs dans MZ Tools / Options...
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
26 mai 2014 à 16:22
Bonjour,

justement, ça ne marche pas!
A part une nouvelle référence dans COM (référence qui, lorsque je l'importe, n'est pas trouvée et provoque des erreurs dans toute mon application), il n'y a rien de nouveau.
Soit je n'ai pas téléchargé et installé la bonne version de MzTools, soit je ne l'ai pas installé correctement.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
26 mai 2014 à 16:29
Tu dois l'installer en tant qu'administrateur.
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
26 mai 2014 à 16:33
Bonjour,
merci, je vais essayer.
Pouvez-vous juste me dire quel version de MzTools dois-je installé par rapport à ma version de Microsoft Visual Basic?
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
26 mai 2014 à 16:35
Pour .NET
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
26 mai 2014 à 16:39
Pas de changement.
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
26 mai 2014 à 20:21
Je tiens à préciser que la case "MzTools 7.0 - Visual...." est déchochée est désactivée, impossible donc de cocher cette case.
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
27 mai 2014 à 16:58
up
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
27 mai 2014 à 18:01
Bonjour,

est-ce que ça pourrai être la cause du problème?:


Supported IDEs

VS 2013 Image Microsoft Visual Studio 2013
VS 2012 Image Microsoft Visual Studio 2012
VS 2010 Image Microsoft Visual Studio 2010
VS 2008 Image Microsoft Visual Studio 2008
VS 2005 Image Microsoft Visual Studio 2005
(except Express editions)
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
27 mai 2014 à 21:19
Bonjour,

problème résolu:

j'ai téléchargé et activé Visual Studio (Ultimate), et j'ai ensuite réessayer d'installer MzTools.

Maintenant, le nouveau menu s'affiche!!

Merci pour votre aide
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
Modifié par Anonyme209 le 27/05/2014 à 21:27
Tout compte fait, je viens de tester:

MzTools ne permet pas de gérer les erreurs dans toutes la forme (à moins que je n'ai pas compris) Il se contente juste d'insérer un
Try Catch
, ce qui est loin d'être mieux que le code que j'utilise actuellement, étant donné qu'il faut toujours effectuer la même opération pour tous les subs.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
27 mai 2014 à 22:02
Tu peux personnaliser le code inséré dans les options de MZTools
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
28 mai 2014 à 12:30
Le problème, c'est que je ne sais pas comment faire.
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
1 juin 2014 à 17:49
up
0
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 251
3 juin 2014 à 10:29
Bonjour,

Le problème, c'est que je ne sais pas comment faire.

Il te l'a dit, il faut chercher un peu :
'outils / mztools / options...', onglet 'Gestionnaire d'erreur'

eric
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
3 juin 2014 à 17:17
Je pense que je me suis mal exprimé:

Ce que je voulais dire, c'est que MzTools permet (d'après moi) d'insérer du code plus rapidement, au lieu d'avoir à le rentrer manuellement.

Bien que j'ai trouvé le menu Options > Gestionnaire d'Exception.
Je peut créer un nouveau gestionnaire d'exception, mais, si je ne sais pas quel code rentrer afin de gérer les erreurs dans tout le programme, ça ne m'aide pas beaucoup.

Merci de votre aide.
0
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 251
3 juin 2014 à 18:40
Tu ne peux pas gérer les erreurs de tout le programme avec 3 lignes de code.
Chaque procédure a sa gestion d'erreurs.
Si le Try Catch ne te plait pas il n'y a que toi qui peut savoir quoi mettre qui te plaise.
Si ça peut t'inspirer voilà ce que j'ai pour vba :
   On Error GoTo {PROCEDURE_NAME}_Error

{PROCEDURE_BODY}

On Error GoTo 0
Exit {PROCEDURE_TYPE}

{PROCEDURE_NAME}_Error:

MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure {PROCEDURE_NAME} of {MODULE_TYPE} {MODULE_NAME}"

eric
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
4 juin 2014 à 12:28
Bonjour,
il me semble que le code que tu m'as donné ressemble de très près à celui que j'utilisais au début. S'il n'y a pas moyen de gérer les erreurs pour tous le documents, ce n'est pas grave, je ferais autrement.

Merci quand-même pour votre aide.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
7 juin 2014 à 17:56
Bonjour,

«il me semble que le code que tu m'as donné ressemble de très près à celui que j'utilisais au début» Effectivement, le code qu'a donné Eric (bonjour Eric et merci d'avoir poursuivi le fil ...) correspond à celui demandé, mais n'était-ce pas le but recherché ???

Plus besoin de le taper, MzTools l'ajoute automatiquement grâce au bouton "Ajouter une gestion d'erreur"

Patrice
0
Anonyme209 Messages postés 678 Date d'inscription samedi 6 octobre 2012 Statut Membre Dernière intervention 22 décembre 2020 15
8 juin 2014 à 12:08
Bonjour,

il y a apparemment eu un problème de compréhension, désolé si je n'ai pas assez bien expliqué mon problème dès le début.
Le but recherché était de gérer les erreurs dans tout le programme VB, avec seulement un bout de code, et pas de devoir écrire le même code pour chaque sub/fonction.
0