Ошибка в классе

[Debugger]

Код:

Код: Выделить всё

Private Sub Form_Load()
    On Error GoTo er
    test
    Exit Sub
er:
    MsgBox "Ошикба: " & Err.Description
End Sub


(в модуле)

Код: Выделить всё

Sub test()
    Err.Raise 15, , "test"
End Sub

Всё проходит отлично, выбрасывается ошибка, ловится, и выводится окошко.

Перемещаем код из модуля в класс, вызываем из формы метод класса:

Код: Выделить всё

Private Sub Form_Load()
    On Error GoTo er
    Dim c As New Class1
    c.test
    Exit Sub
er:
    MsgBox "Ошикба: " & Err.Description
End Sub

Я ожидал аналогичного поведения.
Но ошибка не "проваливается" в место, откуда её вызвали, и выполнение останавливается на Err.Raise.

Может, я что-то делаю не так или чего-то не понимаю?
Пока обхожу проблему с помощью Event'ов. Насколько это (не)правильно и есть ли альтернативы?

[Filyus]

Не знаю почему, но с Friend ошибка передаётся, с Public - нет.
Friend - это объявление функций в классах, доступных только в текущем проекте (что обычно и нужно).

Код: Выделить всё

Friend Sub test()
    Err.Raise 15, , "test"
End Sub

[ger_kar]

Ну вообще по идее, такое поведение - это фича VB, для того чтобы отлаживать код в модулях класса.

BreakError.png (9.3 Кб) Просмотров: 1067

Даже если имеется перехват ошибок VB можно заставить прерываться на любой.
Для этого - опция "Break On All Error"
По умолчанию стоит - "Break in Class Module"
Ну и наконец, что-бы прерываний вообще не было есть еще и третья опция.
Но при любом раскладе - все эти опции действуют исключительно в режиме отладки. И на скомпилированный код никак не влияют. Т.е. это опции исключительно встроенного отладчика.

[Хакер]

Ну и наконец, что-бы прерываний вообще не было есть еще и третья опция.

С чего ради? Третье характеризует ситуацию, когда выполнение прерывается тогда, когда не найден соответствующих обработчик.

[Хакер]

И я бы всё-таки ориентировался на этот скриншот. Эта настройка имеет более генеральное значение (не путать в более высоким приоритетом).

vb_error_trapping_settings.png (13.56 Кб) Просмотров: 1060

[ger_kar]

С чего ради? Третье характеризует ситуацию, когда выполнение прерывается тогда, когда не найден соответствующих обработчик.

Ну речь то как раз шла о перехвате и обработке ошибки, поэтому в контексте этой ситуации я и написал. Если обработчика нет, то прерывание по любому возникнет, и не только в отладочном режиме .