
Si falso, no continuar
Publicado por Nomada (171 intervenciones) el 04/02/2014 22:29:56
Buenas.
Tengo el siguiente código:
pero, cómo hago para que en caso de no haber sobres que imprimir me aparezca un mensaje diciéndomelo y no abra el formumario F_Sobres?
Un saludo.
Tengo el siguiente código:
1
2
3
4
5
6
7
Private Sub botSobres_Click()
Dim CRITERIO As String
Me.Refresh
CRITERIO = "[IMP_SOBRE] = " & -1
DoCmd.Close , ""
DoCmd.OpenForm "F_Sobres", acViewForm, , CRITERIO
End Sub
pero, cómo hago para que en caso de no haber sobres que imprimir me aparezca un mensaje diciéndomelo y no abra el formumario F_Sobres?
Un saludo.
Valora esta pregunta


0