|
||||||||
|
||||||||
Создание обработчика ошибокНастройка перехвата ошибок Написание подпрограммы обработки ошибок Выход из подпрограммы обработки ошибок Обработчик ошибок (error handler) ? подпрограмма, предназначенная для перехвата ошибок и их обработки. Такие обработчики целесообразно добавлять к любой процедуре, где существует вероятность ошибки (строго говоря, следует исходить из того, что любой оператор Visual Basic может стать источником ошибки, если только Вам точно не известно обратное). Создание обработчика ошибок состоит из трех этапов: Включите перехват ошибок, указав в программе, в какую точку кода следует перейти при возникновении ошибки. Оператор On Error включает перехват ошибок и указывает метку строки, с которой начинается подпрограмма обработки ошибок. Функция FileExists из предыдущего примера содержала такую подпрограмму ? она начиналась с метки CheckError. Напишите подпрограмму обработки ошибок, реагирующую на все ошибки, которые Вы можете предвидеть. Когда управление передается этой подпрограмме, то говорят, что обработчик ошибок стал активен. Подпрограмма CheckError обрабатывает ошибку (используя оператор If...Then...Else) в зависимости от значения свойства Number объекта Err, которое представляет собой код, соответствующий ошибке Visual Basic. Например, при ошибке ?диск не готов? обработчик предложит пользователю закрыть дверцу дисковода. Если возникнет ошибка ?устройство не доступно?, он выдаст иное сообщение. И, наконец, если появится любая другая ошибка, обработчик выведет ее краткое описание и остановит программу. Предусмотрите выход из подпрограммы обработки ошибок.При ошибке ?диск не готов? оператор Resume передает управление команде, вызвавшей ошибку, и Visual Basic пытается выполнить ее повторно. Если ситуация не изменилась, возникает та же ошибка, и снова сработает подпрограмма обработки ошибок. При ошибке ?устройство не доступно? оператор Resume Next передает управление команде, следующей за той, что вызвала ошибку. Все эти этапы подробно рассматриваются в следующих подразделах (на примере функции FileExists, показанной ранее).
Текст пособия подготовлен на основе материалов книги Microsoft Corporation. Руководство программиста по Visual Basic для Microsoft Office 97 / Пер. с англ. - М.: Издательский отдел "Русская Редакция" ТОО "Channel Trading Ltd.", 1997. - 544 с.: илл. c Оригинальное издание на английском языке, Microsoft Corporation, 1997 c Русский перевод, Microsoft Corporation, 1997 |
