Custom Query (162 matches)

次のプログラムでCatch As Exceptionという出力がなされない。ステップ実行してもCatch内に入らない。

#console
Imports System
Try
	Throw New SystemException("SystemException") 'SystemExceptionはExceptionの派生クラス
Catch e As Exception
	Print "Catch As Exception"
End Try

Sleep(-1)

次のプログラムでは、Catch As SystemExceptionが出力される。Catch節を上から順に見て、最初に見付かるSystemExceptionをCatch可能なCatch節として、Catch e As Exception以下へ制御が移るようにすべき。

#console
Imports System
Try
	Throw New SystemException("aa")
Catch e As Exception
	Print "Catch As Exception"
Catch e As SystemException
	Print "Catch As SystemException"
End Try

Sleep(-1)

コンパイラに例外機構が搭載されたのに、ライブラリ側の対応がなされていない。まずは、System.Exceptionを初めとする例外クラス群を実装する。

なぜかCatch内が何度も実行されます。

Try
	proc()
Catch
	MessageBox(0, "catch", "title", MB_OK)
Finally
	MessageBox(0, "finally", "title", MB_OK)
End Try

Sub proc()
	Throw
End Sub