IBM Lotus Symphony


Erl-Funktion [Laufzeit]

Gibt die Zeilennummer zurück, an der ein Fehler in der Programmausführung aufgetreten ist.

Syntax:

Erl

Rückgabewert:

Integer

Parameter:

Symbol für Hinweis Die Erl-Funktion gibt lediglich eine Zeilennummer, jedoch kein Zeilenlabel zurück.

Beispiel:

sub ExampleError

on error goto ErrorHandler REM Fehlerbehandlung anmelden

Dim iVar as Integer

Dim sVar As String

REM Hier wird ein Fehler verursacht, da die Datei nicht existiert

iVar = Freefile

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

Line Input #iVar, sVar

Close #iVar

exit sub

ErrorHandler:

MsgBox "Fehler " & err & ": " & error$ + chr(13) + "In Zeile: " + Erl + chr(13) + Now , 16 ,"ist ein Fehler aufgetreten"

end sub


Produktfeedback | Zusätzliche Dokumentation | Marken