IBM Lotus Symphony


Função Erl [Runtime]

Devolve o número da linha onde ocorreu um erro durante a execução do programa.

Sintaxe:

Erl

Valor de retorno:

Integer

Parâmetros:

ícone de Nota A função Erl apenas devolve um número de uma linha, e não um rótulo de uma linha.

Exemplo:

sub ExampleError

on error goto ErrorHandler REM Definir rotina de tratamento de erros

Dim iVar as Integer

Dim sVar As String

REM Erro causado por ficheiro não existente

iVar = Freefile

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

Line Input #iVar, sVar

Close #iVar

exit sub

ErrorHandler:

MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"An error occurred"

end sub


Comentários sobre o produto | Documentação adicional | Marcas comerciais