Código
On Error GoTo denei 'Código posible error If Not lbl_d.Caption = lbl_dni1.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni2.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni3.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni4.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni5.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni6.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni7.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni8.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni9.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") Else If Not lbl_d.Caption = lbl_dni10.Caption Then error = MsgBox("DNI no registrado", vbExclamation, "Error") End If End If End If End If End If End If End If End If End If
el error creo que esta en la primera línea
Código
pero nose como arreglar este error.
On Error GoTo denei
saludos