IBM Lotus Symphony


Fonction Erl [Exécution]

Renvoie le numéro de la ligne dans laquelle une erreur s'est produite lors de l'exécution du programme.

Syntaxe :

Erl

Valeur de retour :

Nombre entier

Paramètres :

Icône Remarque La fonction Erl renvoie uniquement un numéro de ligne et non un libellé de ligne.

Exemple :

sub ExampleError

on error goto ErrorHandler REM Configurer le gestionnaire des erreurs

Dim iVar As Integer

Dim sVar As String

REM Erreur due à un fichier inexistant

iVar = Freefile

Open "\file9879.txt" for Input as #iVar

Line Input #iVar, sVar

Close #iVar

exit sub

ErrorHandler:

MsgBox "Erreur " & err & " : " & error$ + chr(13) + "A la ligne : " + Erl + chr(13) + Now , 16 ,"Une erreur s'est produite"

end sub


Commentaires en retour sur le produit | Documentation complémentaire | Marques