IBM Lotus Symphony


Función Erl [Ejecución]

Devuelve el número de línea en que se produjo un error durante la ejecución de un programa.

Sintaxis:

Erl

Valor de retorno:

Entero

Parámetros:

Icono de nota La función Erl sólo devuelve el número, no la etiqueta de línea.

Ejemplo:

sub EjemploError

on error goto ManejadorError REM Configurar manejador de errores

Dim iVar As Integer

Dim sVar As String

REM Error causado por archivo no existente

iVar = Freefile

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

Line Input #iVar, sVar

Close #iVar

exit sub

ManejadorError:

MsgBox "Error " & err & ": " & error$ + chr(13) + "En la línea: " + Erl + chr(13) + Now , 16 ,"Se ha producido un error"

end sub


Comentarios del producto | Documentación adicional | Marcas registradas