Не обрабатываются ошибки в VB6!!!!!!!!!!!
Sub main()
On Error GoTo hadiSuda
Error 120
Exit Sub
hadiSuda:
Debug.Print Err.Number & " " & Err.Description
End Sub
Ошибка не обрабатывается!!!
Что не так???
P.S. Выручайте! Очень надо!
P.P.S. В реальных прогах ошибки не обрабатывались, поэтому я сделал ЭТО...(см. выше.)
On Error GoTo hadiSuda
Error 120
Exit Sub
hadiSuda:
Debug.Print Err.Number & " " & Err.Description
End Sub
Ошибка не обрабатывается!!!
Что не так???
P.S. Выручайте! Очень надо!
P.P.S. В реальных прогах ошибки не обрабатывались, поэтому я сделал ЭТО...(см. выше.)
Звиняйте, нашел!!!
В настройках надо было покопаться!!!
В настройках надо было покопаться!!!
Цитата:
Originally posted by XtreamAll
Звиняйте, нашел!!!
В настройках надо было покопаться!!!
Звиняйте, нашел!!!
В настройках надо было покопаться!!!
Интересно в каких настройках ты покапался, там же по умолч. все нормально настроено
P.S. обычно выход тоже делают через метку и возвращают на нее после обработки ошибок, удобно, чтобы некоторый код всегда выполнялся
On Error GoTo Err_
...
...
Ex_:
...
Exit Sub
Err_:
...
Resume Ex_
Цитата:
Originally posted by SergeySV
Интересно в каких настройках ты покапался, там же по умолч. все нормально настроено
Интересно в каких настройках ты покапался, там же по умолч. все нормально настроено
...Tools\Options\General\Error Trapping
Ну может когда то "расстроил" эти "умолчания":D