Try-Catch-Finally

[ism]

Почему появляются оба сообщения? Finally должен выполняться только в случае если исключений не происходило.

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

        Dim a,b,c As Integer

        a = 10
        b = 0
        Try
            c = a / b
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        Finally
            MessageBox.Show("Ошибок не произошло")
        End Try

[Ramzes]

Юзай Exit Try

[Sebas]

Finally - Выполняется всегда!!!!!!

[ism]

Если всегда, то для чего он, почему бы тогда не написать End Try, все что за ним всеравно выполнится?

[GSerg]

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

[Sebas]

Если всегда, то для чего он, почему бы тогда не написать End Try, все что за ним всеравно выполнится?

-Exit Sub (function,do.. etc)
-Exception in Catch section

[Viper]

Finally выполняется всегда, несмотря ни на что. Даже если есть Exit Sub, Exit Try или Return. Или в случае, когда исключение происходит уже в блоке Catch.

Очень удобно когда надо иметь единственную точку выхода из процедуры. При этом можно вообще весь код поместить в блок Try ... Finally ... End Try

[Ronin]

Посмотри статьи....