Visual Basic «Наконец, за исключением»

Question

Я хочу запустить блок кода после операторов catch независимо от того, какое исключение происходит, но только тогда, когда происходит какое-то исключение. Таким образом, в основном это оператор finally, который требует исключения для выполнения. Есть ли простой способ сделать это в визуальных базовых?

Answer 1

Блок finally оператора If всегда будет вызываться независимо от того, есть ли возникшее исключение или нет. MSDN

Единственный способ сделать это - использовать другой метод, который принимает исключение в качестве параметра и вызывать этот метод из исключения catch.

Answer 2

Вы можете добавить различные блоки исключений, например:

Try 
    ' do operation 
' Most specific: 
Catch e As ApplicationException 
    ' do something only if ApplicationException has occurred 
' Least specific: 
Catch e As Exception 
    Console.WriteLine("{0} Second exception caught.", e); 
End Try 

Answer 3

Как насчет

Dim isException As Boolean = False 
Try 
    .... 
Catch ex As ApplicationException 
    isException = True 
    .... 
Catch ex As Exception 
    isException = True 
    .... 
Finally 
    If (isException) 
     .... 
    End If 
End Try 

Answer 4

мне не нравится это, но как насчет вложенного Try:

Try 
    Try 
     .... 
    Catch ex As ApplicationException 
     Throw 
    Catch ex As Exception 
     Throw 
    End Try 
Catch 
    ' This is your "finally" 
End Try