まだ、2003 と戯れている私ですが、
今日、他の人のソースを見てたら驚愕の事実が。
実際に見たのはもうちょっと複雑なメソッドだったのですが
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim condition As Boolean = Me.CheckBox1.Checked
Try
Throw New ApplicationException("nanika ga okashi- nanika ga")
Catch apexTrue As ApplicationException When condition
Console.WriteLine("チェックがオンの時なはず")
Catch apexFalse As ApplicationException
Console.WriteLine("チェックがオフの時なはず")
Catch ex As Exception
Console.WriteLine(ex.Message)
End Try
End Sub
えーっ！
Catch の後ろに When なんて書けるのかー。
知らなかった～。
でも...キモい...