Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » FoxPro/Visual FoxPro » Regresar a Inputbox foxpro

FoxPro/Visual FoxPro - Regresar a Inputbox foxpro

Volver
Nuevo Tema
<<>>
 
Vista:
sin imagen de perfil
Val: 1
Ha aumentado su posición en 13 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Regresar a Inputbox foxpro

Publicado por Ricardo (1 intervención) el 03/08/2019 05:40:19
¡Buenas noches!!
Estoy empezando en FoxPro y necesito ayuda ...
Usé este comando para un Loop si el nombre no es correcto en OK, pero ¿qué comando uso en CANCELAR de Inputbox para cerrar?

1
2
3
4
5
6
7
8
Chevrolet="Chevrolet"
DO WHILE .T.
a = INPUTBOX ("Digite o Veículo","Chevrolet")
IF a = (Chevrolet)
MESSAGEBOX ('Veículo Correto!') 

CANCEL
ENDIF
ENDDO
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Leonardo Daniel A.
Val: 1.115
Oro
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Regresar a Inputbox foxpro

Publicado por Leonardo Daniel A. (504 intervenciones) el 03/08/2019 06:44:21
Hola es que tú while no debe ser sobre .t.

Debería se algo así

1
2
3
4
5
6
7
8
Incorrecto = .t.
DO WHILE incorrecto = .t.
    a = INPUTBOX ("Digite o Veículo","Chevrolet")
    IF a = (Chevrolet)
         MESSAGEBOX ('Veículo Correto!') 

         Incorrecto = .f.
    ENDIF
ENDDO

Hacer el ciclo miéntras sea incorrecto.. cuando sea la variable .f.es decir que ya no es incorrecto.. automáticamente sale del while
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Abel
Val: 642
Plata
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Regresar a Inputbox foxpro

Publicado por Abel (286 intervenciones) el 04/08/2019 16:05:38
En vez de CANCEL usa EXIT

1
2
3
4
5
6
7
8
Chevrolet="Chevrolet"
DO WHILE .T.
a = INPUTBOX ("Digite o Veículo","Chevrolet")
IF a = (Chevrolet)
MESSAGEBOX ('Veículo Correto!') 

EXIT
ENDIF
ENDDO
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar