Что такое "Ошибка номер 0" ?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Что такое "Ошибка номер 0" ?

Сообщение Dummiel » 02.08.2004 (Пн) 7:22

При применентии On Error GoTo ... и дальнейшей обработке ошибок типа

Else
msgbox Err.Number & Err.Description
Emd If

прога выдает ошибку номер 0 (ноль). Что это такое? Перелопатил код всей формы, все работает, не могу врубиться.
После Stop, затем пошаговой трассировке F8 выполняется весь код формы, по окончании выполнения идет на метку обработки ошибки и выдает эту муть.

Подскажите, плз! Надо что-то делать здесь! :wink:

GM
programador
programador
 
Сообщения: 1427
Зарегистрирован: 24.06.2003 (Вт) 15:56
Откуда: 194.67.52.100

Сообщение GM » 02.08.2004 (Пн) 7:42

прога выдает ошибку номер 0 (ноль). Что это такое?

Ошибка номер 0, это ошибка - "Нет ошибки" :).
Возможно происходит что-то типа:
Код: Выделить всё
on error goto exception
a = a + 1
msgbox Err.Number & Err.Description
الفيجوال بيسك الرابح

Dzhon
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 236
Зарегистрирован: 09.12.2003 (Вт) 13:30
Откуда: Россия, Омск

Сообщение Dzhon » 02.08.2004 (Пн) 7:48

Обрабатывай так:
If error.number <> 0 then
Твой код
end if

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 02.08.2004 (Пн) 10:28

Ошибки никакой нет, просто надо перед обработчиком ставить Exit Sub/Exit Function.

Вот цитата из МСДН:
To prevent error-handling code from running when no error has occurred, place an Exit Sub, Exit Function, or Exit Property statement immediately before the error-handling routine, as in the following fragment:

Код: Выделить всё
Sub InitializeMatrix(Var1, Var2, Var3, Var4)
   On Error GoTo ErrorHandler
   . . .
   Exit Sub
ErrorHandler:
   . . .
   Resume Next
End Sub

Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Сообщение Dummiel » 04.08.2004 (Ср) 13:38

Спасибо большое!
Насчет цитаты из MSDN: мне бы еще больше, чем два слова знать по-аглицки :-(


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 32

    TopList  
cron