ante todo saludos..
soy un novato en vb6.0 y bueno estoy haciendo un sistema de cuentas por pagar
y quiero que por favor me ayuden a menejar errores con los eventos movelast. movenext etc
gracias
| |||
| ante todo saludos.. soy un novato en vb6.0 y bueno estoy haciendo un sistema de cuentas por pagar y quiero que por favor me ayuden a menejar errores con los eventos movelast. movenext etc gracias |
| |||
| Respuesta: como manejo errores Aca Te Dejo Un Ejemplo Controlado 2 Errores... Si Tenes alguna Duda Avisa!! Tambien Te dejo El Link de MSDN... Pegale una Leidita...
Código:
Private Sub Form_Load()
On Error GoTo Chequear_Errores
Dim Var1 As Integer
Dim Var2 As Integer
Dim Var3 As Byte
Var1 = 1000
Var2 = 0
MsgBox Var1 / Var2
Var3 = Var1
MsgBox "By agus0"
Exit Sub
Chequear_Errores:
If Err.Number = 11 Then '11 es El Numero de error de "Division Por 0"
Var2 = 2
Resume 'Se Usa Para Volver donde se Produjo el Error
ElseIf Err.Number = 6 Then 'Error 3 = Desbordamiento
Resume Next 'Se Utiliza para Omitir esa Linea y segur Con la Siguiente
End If
End Sub
|
| Etiquetas: |