17/08/2011, 00:42
|
| | | Fecha de Ingreso: noviembre-2010
Mensajes: 9
Antigüedad: 13 años, 6 meses Puntos: 0 | |
| Respuesta: Segundo error no se controla
Dobleposteo. Vaya, antes pongo el mensaje, antes encuentro la solución:
Private Sub Command1_Click()
Dim i As Integer
On Error GoTo solu
For i = 0 To 10
i = 5 / 0
siguiente:
On Error GoTo -1
On Error GoTo solu
Next
Exit Sub
solu:
MsgBox "CONTROLADO"
GoTo siguiente
End Sub
Sorry. |