Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/08/2006, 11:45
nolo41
 
Fecha de Ingreso: julio-2006
Mensajes: 98
Antigüedad: 18 años, 9 meses
Puntos: 0
Porque un Runtime ERROR ?

Hola. Hay una cosa que no entiendo en este exemplo de programa que hice. Mi idea es de atrapar el error con ON ERROR, pero cuando lo corro me cancela diciendo :

RUN TIME ERROR '13'
Type Mismatch

Porque ? si yo puse dentro de la rutina err: un msgbox para mostrar el error y salir correctamente.... ademas no sale el mensaje del MSGBOX....

Alguien podria ayudarme...
Gracias...


Programa
==========
Private Sub Form_Load()
On Error GoTo err

Call divisionporcero

On Error GoTo 0

err:
MsgBox err.Number, err.Description

End Sub

Sub divisionporcero()
Dim b As Integer

a =1
b = a / 0

End Sub