Discussion :

[pounaid]

Bonjour,

j'ai une instruction de la forme :

Code :

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

1
2
3
If champs(0) Is Nothing
   GoTo suivant
End If

Plus loin j'ai :

Code :

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

On Error GoTo suivant

Je ne vois pas comment gérer ces exception. Car le compilateur me dit que 'suivant' n'est pas valide car il se trouve à l'intérieur d'une instruction 'For' ou 'For Each' qui ne contient pas cette instruction.

Si j'essaye de faire :

Code :

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

1
2
3
4
5
Try
    champs(0)
Catch champs(0) Is Nothing As Exception
    //mettre le contenu de suivant
End Try

Ca me fait des erreurs et en plus j'ai près de 70 erreurs qui s'ajoutent :
" Une méthode ne peut pas contenir à la fois une instruction 'Try' et une instruction 'On Error' ou 'Resume' "

Et un autre point comment évaluer On Error GoTo ?
Parce que faire

Code :

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

1
2
Try
    On Error

ca ne marche pas des masses...

Merci d'avance car je suis vraiment perdu...

[MamashBek]

On Error Resume Next : Si une erreur survient ton programme continue avec les risques variables selon la nature de l'erreur dans ton programme

On Error Goto Erreur_de_mon_sub: permet de te renvoyer dans une procédure (au sein de ton sub) suite à une erreur , exmple:
Sub Mon_sub
On Error Goto Erreur_de_mon_sub

'Ton code

Erreur_de_mon_sub:
Msgbox "Attention erreur dans le traitement: " & err.Number & ChrW(10) _
& CrhW(13) & err.Description
End Sub

Sinon tu as:

Try
'ton code
'si anomalie alors on passe à la partie Catch
Catch ex As Exception
Msgbox "ex.Message"
Finally
'Important il te permets par exemple de mettre des valeurs par defauts
'suite à des erreurs dans le try ou simplement à fermer des objets
End Try

Pour plus de détails, tu as par exemple: http://plasserre.developpez.com/v4-3.htm

[nikoko34]

Bonjour,
Toi, tu as fait du VB6, non ?

Le "on error goto <un bloc de code>" se traduit effectivement par un try catch dans lequel la partie catch contient ce qu'il y avait dans ton code <un bloc de code>.

Il n'y a pas besoin de mettre le "on error" car dans un "try/catch/End try", on va dans le catch justement dès qu'il y a une erreur.

[pounaid]

Ok j'y vois plus clair concernant Try ... Catch.

Cependant, ce message d'erreur :
" Une méthode ne peut pas contenir à la fois une instruction 'Try' et une instruction 'On Error' ou 'Resume' "
Si j'ai bien compris je dois reprendre tous les "On Error" de mon code et les adaptés sur un Try ... Catch ?

Une autre petite question,
ordonnancement de mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
For
//du code
 
Try ..
Catch ...
//le code de suivant que j'ai recopié
End Try
 
//la sutie du code For
End For
 
suivant:
//blabla

Comment je peux dire à la fin du Try de revenir à la suite du code For ?
Ou je ne m'y prend pas de la bonne manière ?

Merci

[MamashBek]

Exit Try

[nikoko34]

Ca n'est pas la meilleur idée de remplacer tous les on error par un try catch si tu as beaucoup d'instruction de ce type.
En fait, tout dépend du nombre différent de bloc concerné par l'ensemble des goto.

Si ce nombre est égal à 1 (c'est à dire qu'il n'y a qu'un seul bloc de code pour gérer l'ensemble des erreurs, ex. "suivant" dans ton exemple initial), tu fais un seul try/catch de haut niveau dans ta méthode (qui va donc englober l'ensemble du code de ta méthode).

Si tu as plusieurs blocs de code différents pour gérer les erreurs, il faut étudier si ces blocs ne sont pas associés à des types d'exception (exemple IO, memory...) auquel cas il te faut regarder dans les tutos les types d'exception (les 3 petits points après le mot clé Catch).

Si c'est plus complexe que ça, tu peux rerouter sur des méthodes dans le bloc du catch selon la typologie d'erreur.

[pounaid]

Merci a tous pour votre aide, et merci nikoko34, tu as mis le doigt en plein dans le mille