آبجی
14th February 2010, 12:53 AM
استفاده از When در Catch کمتر شناخته شده است.
در این حالت کنترل اجرای برنامه در صورتی به Catch منتقل میشه که عبارت جلوی When مقدار True رو برگشت بده:
Dim a As Int16 = 32766
Dim b As Int16 = 2
Try
a += b
Catch ex As Exception When b > 1
MessageBox.Show(ex.ToString)
Finally
End Try
در این حالت کنترل اجرای برنامه در صورتی به Catch منتقل میشه که عبارت جلوی When مقدار True رو برگشت بده:
Dim a As Int16 = 32766
Dim b As Int16 = 2
Try
a += b
Catch ex As Exception When b > 1
MessageBox.Show(ex.ToString)
Finally
End Try