IBM Lotus Symphony


Função Erl [Tempo de Execução]

Retorna o número da linha em que ocorreu um erro durante a execução do programa.

Sintaxe:

Erl

Valores de Retorno:

Inteiro

Parâmetros:

Ícone de Nota A função Erl retorna apenas um número da linha e não um rótulo de linha.

Exemplo:

sub ExampleError

on error goto ErrorHandler REM Configurar a rotina de tratamento de erro

Dim iVar as Integer

Dim sVar As String

REM Erro causado por arquivo não existente

iVar = Freefile

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

Line Input #iVar, sVar

Close #iVar

exit sub

ErrorHandler:

MsgBox "Erro " & err & ": " & error$ + chr(13) + "Na linha : " + Erl + chr(13) + Now , 16 ,"Ocorreu um erro"

end sub


Feedback do Produto | Documentação Adicional | Marcas Registradas