| Вопрос: замена error-message на свой текст | Добавлено: 18.02.04 21:32 |
Автор вопроса:  ksyha
|
|
такое возможно? чтоб программа не реагировала десятистрочными ругательствами на определенную ошибку а просто выдавала "вася, ты не прав!"? |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  NeForm@t ICQ: 252999255 Вопросов: 36 Ответов: 247 |
Web-сайт: Профиль | | #1 | Добавлено: 18.02.04 23:05 |
|
Возможно: вот например так: Sub Form_load() on error goto NoErr .... a=5\0'здесь должна возникнуть ошибка "деление на 0" .... exit sub NoErr: msgbox "Вася, ты ламак, делить на ноль нельзя!!!!"'и он перескочить сюда end sub |
||
|
Номер ответа: 2 Автор ответа:  Artificial IntelligenceICQ: 275368971 Вопросов: 8 Ответов: 131 |
Профиль | | #2 | Добавлено: 19.02.04 10:38 |
|
Правильней-то конечно делать так:
Sub Form_load()On Error GoTo NoErr....a = 5 \ 0 'здесь должна возникнуть ошибка "деление на 0".... Err_Ret: ....Exit SubNoErr: MsgBox("Вася, ты ламак, делить на ноль нельзя!!!!") 'и он перескочить сюдаResume Next'или на любую другию точкуResume Err_RetEnd Sub |
||
Страница: 1 |