• CATCH

SUB Function ( ... ) ... CATCH ... END

 

この命令は、関数またはプロシージャのエラー管理部分の始まりを示します。

キャッチ部分は、関数実行の開始と終了の間にエラーが発生したときに実行されます。 このエラーは、関数自体によって、または実行中に呼び出される他の関数によって発生する可能性があります。ただし、この深い関数自体にはキャッチ部分がないため、キャッチ部分が深いほど優先順位が高くなります。

catch部分の実行中にエラーが発生した場合、それは通常伝播されます。 キャッチ部分はそれ自体を保護しません！

関数内にfinally部分がある場合、それはcatch部分の前になければなりません。 詳細は FINALLY fを参照してください。

Examples

' Prints a file to the screen

Sub PrintFile(FileName As String)

Dim hFile As File
 Dim sLig As String

 hFile = Open FileName For Read

While Not Eof(hFile)
Line Input #hFile, sLig
Print sLig
Wend

Finally ' Always executed, even if a error is raised. Warning: FINALLY must come before CATCH!
 Close #hFile

Catch ' Executed only if there is an error
 Print "Cannot print file "; FileName

End

See also

• Error Management