¿Me puedes ayudar en FOXPRO?

Hola!
Tengo que poner almacen (1ó2) como le puedo poner en el programa
En condición para que solo pueda poner 1ó2 (almacen es caja de texto)
Lo que yo tengo esta así:
      if found () then
Thisform. Almacen>2 and thisform. Almacen<1
wait win "EL ALMACEN NO EXISTE"
Endif

gracias por tu ayuda de vdd...

1 respuesta

Respuesta
1
En el Valid del TextBox coloca lo siguiente
IF EMPTY(This.value)
    RETURN
ENDIF
IF !BETWEEN(This.value,1,2)
   MESSAGEBOX("ALMACEN NO EXISTE",16,"ERROR")
RETURN 0
Endif

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas