Вопрос № 178144: Уважаемые эксперты подскажите в следующем имеется процедура Sub А() ………. End Sub В её теле есть указание на исполнение функции В теле функции есть всевозможные проверки Например, по проверке нужно выйти из Sub А, но написать Exit Su...
Вопрос № 178144:
Уважаемые эксперты подскажите в следующем имеется процедура Sub А() ………. End Sub В её теле есть указание на исполнение функции В теле функции есть всевозможные проверки Например, по проверке нужно выйти из Sub А, но написать Exit Sub я не могу, могу лишь Exit Function. Но это немного не то, потому что с функции выхожу в процедуру А, процедура продолжает делать далее по коду, как же указать чтобы выйти из процедуры А??? Спасибо Эндрю
Отвечает Измалков Эдуард Леонидович, 5-й класс :
Здравствуйте, Ципихович Эндрю! Самый простой способ объявить эту функцию как Boolean, а в А сделать проверку на ее результат и выход при неудовлетворительном результате. Пример:
Sub A() If Проверка_Условия Then MsgBox "Принудительный выход из главной процедуры" Exit Sub End If MsgBox "Главная процедура успешно выполнена" End Sub
Function Проверка_Условия() As Boolean Проверка_Условия = False If 1 > 0 Then Проверка_Условия
= True Exit Function End If MsgBox "Функция успешно выполнена" End Function
Ответ отправил: Измалков Эдуард Леонидович, 5-й класс
Ответ отправлен: 01.05.2010, 11:31
Номер ответа: 261138
Оценка ответа: 5
Вам помог ответ? Пожалуйста, поблагодарите эксперта за это! Как сказать этому эксперту "спасибо"?
Отправить SMS#thank 261138
на номер 1151 (Россия) |
Еще номера »
Оценить выпуск »
Нам очень важно Ваше мнение об этом выпуске рассылки!
* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи.
(полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.