¿Como evito la perdida del foco si no pongo una cantidad en un cuadro de
texto?
He probado asi, pero el foco se mueve al siguiente control por narices.

        If Nz(Me.MiCampo.Value, 0) = 0# Then
        'MsgBox "Debes poner una cantidad primero"
        DoCmd.GoToControl "MiCampo"
        End If


JOSE NIETO
==========
Private Sub Texto7_Exit(Cancel As Integer)
If IsNull(Me!Texto7) = True Then
    MsgBox "tienes q meter un valor"
    Cancel = True
End If
End Sub

    Source: geocities.com/es/ensolva/Descargas/Documentos

               ( geocities.com/es/ensolva/Descargas)                   ( geocities.com/es/ensolva)                   ( geocities.com/es)