Ciclo while
Publicado por Cristal vasquez (87 intervenciones) el 06/04/2006 20:17:30
Hola a todos. Alquien que me pudiera ayudar con esto: estoy haciendo un informe donde lo quiero que se filtre por fechas, cuando trato de validar que los campos donde van a ir la fecha desde y la fecha hasta para que no me queden en blanco, en el evento clic del botón INFORME tengo el siguiente codigo donde supuestamente valido:
While Not (bandera = 1)
If (Me.txtFechaComienzo) = " " Or IsNull(Me.txtFechaComienzo) Then
MsgBox ("El campo Fecha inicio dede contener alguna valor"), vbCritical, ("Campos Imcompletos")
Else
If (Me.txtFechaFin) = " " Or IsNull(Me.txtFechaFin) Then
MsgBox ("El campo Fecha Fin dede contener alguna valor" & vbCrLf)
Else
bandera = 1
End If
End If
Wend
Pero se me esta quedando en el ciclo y no me continua con la busqueda en la tabla. No se que mas, he intentado de varias formas y no resuelvo el problema. Muchas gracias de antemano.
While Not (bandera = 1)
If (Me.txtFechaComienzo) = " " Or IsNull(Me.txtFechaComienzo) Then
MsgBox ("El campo Fecha inicio dede contener alguna valor"), vbCritical, ("Campos Imcompletos")
Else
If (Me.txtFechaFin) = " " Or IsNull(Me.txtFechaFin) Then
MsgBox ("El campo Fecha Fin dede contener alguna valor" & vbCrLf)
Else
bandera = 1
End If
End If
Wend
Pero se me esta quedando en el ciclo y no me continua con la busqueda en la tabla. No se que mas, he intentado de varias formas y no resuelvo el problema. Muchas gracias de antemano.
Valora esta pregunta


0