30/10/2006, 08:24
|
| | | Fecha de Ingreso: julio-2006
Mensajes: 98
Antigüedad: 18 años, 3 meses Puntos: 0 | |
| OK, gracias ya entendi !!!
Rutina de error:
=============
Dim a As System.DivideByZeroException
a = New System.DivideByZeroException
Dim b As System.Exception
b = New Exception
If Equals(a.GetType, ParamErreur.GetType) Then
MessageBox.Show("division cero")
End If
If Equals(b.GetType, ParamErreur.GetType) Then
MessageBox.Show("exception gral")
End If |