Programación General > Visual Basic 6.0 e inferiores

 Re: Validacion de los "text"

<< < (3/5) > >>

Cero Kull:
Mira presione lo que me digiste y se quedo en text.setfocus
Otra cosa el error siempre ocurre cuando presiono la tecla TAB pero sin ingresar nada en ninguno de los text

Parece que no habia explicado eso, siempre el error se queda ahy cuando hago eso. con los texts vacios por eso marca el error... (como que si se quedara en un ciclo)

Bueno saludos...
atte.
Cero Kull

javierbalk:
Hola cero Kull:

Tenías razón, si el text donde estás y el que sigue están los dos vacíos, se queda dando el error de que igrese algo de ambos text y no se puede más salir de los mensajes.

Cambiá el código de la rutina de ProcesarLostFocusText a este otro:

'*****************************
Public Sub ProcesarLostFocusText(txt As TextBox)
Static Procesando As Boolean

If Procesando Then Exit Sub
Procesando = True
txt.Text = Trim(UCase(txt.Text))
If txt.Text = "" Then
MsgBox " INGRESE ALGO ", vbCritical
txt.SetFocus
DoEvents
End If
Procesando = False
End Sub
'*****************************

Le agregué una variable estática para saber si ya está procesando el LostFocus de otro y un DoEvents para que luego de que haga el SetFocus vaya inmediatamente.

Saludos,
Javier

Cero Kull:
Javier....
Pense que preguntaba solo estupideses pero nunca dije  que el error ocurria sin ingresar nada ja je jeja
Voy a probar eso y luego te cuento .

saludos

 Atte Cero Kull®

Cero Kull:
Hola...

Javier Funciona Bien!!., pero tengo una duda que pasa si yo, hago lo siguente coloco un boton que me de un mensaje o me envie a otro Form, mientras este el cursor en el text que llama al otro text,(como el problema anterior) sin escribir nada.

Creo que el mensaje aparece cada vez que presiones el boton, por lo que no podras ocupar ese boton hasta que los text tengan algo escrito, y que pasa si el usuario se arriepente de ingresar algo y quiere volver a la pantalla anterior o eligir si no es un sistema, el boton salir???

Creo que me entendiste, como hago para solucionar esto!!

Saludos de Cero Kull®

B)

javierbalk:
Hola Cero Kull:

Si querés que el usuario pueda salir y dejar en blanco el Text en algunos casos, solo coloca una variable a modo de bandera.
Por ejemplo una variable Cancelar booleana a nivel del formulario, cuando el usuario hace click en un botón que quieres que no saque el mensaje, en el evento MouseDown y en el GotFocus la pones Cancelar = True, luego antes de llamar a la rutina de validación de los text que está en el LostFocus, preguntas por esa variable:
 If Not Cancelar Then ProcesarLostFocusText Text1

Esto no lo probé, pero creo que tiene que funcionar, fijate si lo podés hacer andar.

Saludos,
Javier

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

[*] Página Anterior