acabo de descubrir, que si una procedimiento dentro del código de una
clase genera un error. Ej. Err.raise ##, pero el código que usaba la
clase tiene un ON ERROR RESUME NEXT / ON ERROR GOTO label. pasa lo
siguiente
EN TIEMPO DE DESARROLLO: devuelve siempre un cartel de error, es
decir, no trappea el on error goto del código que usa la clase (sea
inicialización de clase, uso de una función de la clase, etc).
YA COMPILADO: no devuelve cartel, y el error es manejado por el código
que usó la clase. (como yo pienso que debe ser).
Ej. de prueba
Private Sub Form_Load()
On Error GoTo Err
Dim d As Class1
Set d = New Class1
Exit Sub
Err:
Beep
End Sub
y en módulo de clase..
Private Sub Class_Initialize()
Err.Raise 20
End Sub
Alguien sabe a qué se debe?
Leer las respuestas