IBM Lotus Symphony


Функция Err [встроенная]

Возвращает код ошибки, возникшей во время выполнения программы.

Синтаксис:

Err

Возвращаемое значение:

Integer

Параметры:

Функция Err применяется в процедурах обработки ошибок для определения ошибки и действий по ее исправлению.

Пример:

sub ExampleError

on error goto ErrorHandler REM Настроить блок обработки ошибок

Dim iVar as Integer

Dim sVar As String

REM Причина ошибки - отсутствие файла

iVar = Freefile

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

Line Input #iVar, sVar

Close #iVar

exit sub

ErrorHandler:

MsgBox "Ошибка " & Err & ": " & Error$ + chr(13) + "В строке: " + Erl + chr(13) + Now , 16 ,"произошла ошибка"

end sub


Комментарии по продукту | Дополнительная документация | Товарные знаки