Leer sólo números en textbox

[K!k3]

Hola a todos

No sé por qué no funciona.

A veces cuando estamos tan presionados y estresados, como que se limita el pensamiento y las ideas no llegan.

Necesito que mi textbox solo lea números, y que cuando alguien teclee un botón NO NUMÉRICO le salga un mensaje de error, o simplemente lo ignore.
Sé que debo usar el KeyPress, pero no se me ocurre nada.

Me disculpo por preguntar cosas tan fáciles, pero a veces sucede que nos quedamos en blanco.

Victor Navarro
Barranquilla, COLOMBIA
3008102508
ICQ 279 364 380
Face: +573008102508
MSN: eres_u...@hotmail.com
Mail: eres_u...@yahoo.es
Whatsapp: +573008102508
Skype: eres_un_vago
PIN: 7A3F5E60

[Cesar Yamunaque Baca]

Formatea el TextBox

en el Format coloca "@KZ 

en el Value coloca 0 

y eso es todo

[Analyzer]

Puedes hacer una prueba con un form vacío.

Pon 3 cuadros de texto y un boton de comando en el form.

En el click del boton pon lo siguiente:

Thisform.text3.value=Thisform.text1.Value+thisform.text2.value

Y configura las propiedades de los 3 texts de la siguiente manera:

Value=0

Format=KR

Inputmask=999,999,999.99

Ahora escribe SET CONFIRM ON en el load del form

Observa que pasa y notarás la idea..

Saludos!

--
_______________________________________________________________
Has recibido este mensaje porque estás suscrito al Grupo "Mundo Visual
FoxPro" de Grupos de Google.
 
Para anular la suscripción a este grupo, envía un mensaje a:
mundovisualfox...@googlegroups.com
---
Has recibido este mensaje porque estás suscrito al grupo "Mundo Visual FoxPro" de Grupos de Google.
Para anular la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a mundovisualfox...@googlegroups.com.
Para acceder a más opciones, visita https://groups.google.com/d/optout.

[Gerardo Baron]

Ocupa # en tu textbox

--

[Alfonso Ramirez Diaz]

En la propiedad Format del Textbox colocas un 9, o en la propiedad InputMask colocas 9999999 dependiendo cuantos nueves quieres, o en la propiedad Value colocas 0, etc. también si la variable es inicializada en 0 no es necesario nada mas.

--

Alfonso Ramirez Diaz

Gestpyme - Informática y Gestión

Fono: 055-833233

Móvil: 09-82239821

[Wilber Juan Mendoza Quispe]

Buenos Dias

Espero esto te sirva.. en el Evento VALID puesdes poner esto :

IF !ISDIGIT(THIS.VALUE)

WAIT Windows "Digite solo Numeros" TIMEOUT 3

return(.F.)

ENDIF

Salu2

 

 

Wilber Juan Mendoza Quispe
Facilitador - Programador

Web Site  : www.sistemasdatamen.com

Em@il      : wjm...@sistemasdatamen.com

                 wjm...@hotmail.com
                 wjm...@yahoo.com
Movistar :    969495995

Rpm        : #969495995

 

---

Date: Fri, 8 Aug 2014 10:48:30 -0700
From: eres.u...@gmail.com
To: mundovis...@googlegroups.com
Subject: [Mundo Visual FoxPro] Leer sólo números en textbox

[Alejandro Martínez]

y si declaras una variable numerica y la asignas al control en cuestion !? así se acaban todos los problemas...

PUBLIC mivariable

STORE 0 TO mivariable

Y EN LA PROPIEDAD DEL TEXBOX, controlsource, LE ASIGNAS LA VARIABLE

--

Jose Alejandro Martínez Pacheco | Servicios Alimentarios Especializados
Av. Del Estado 1419, Col. Buenos Aires 

Monterrey, Nuevo Leon, Mexico 64800
www.serviciosalimentarios.com 

[Fidel Charny]

ISDIGIT() testea solo el primer caracter de una cadena.
"ISDIGIT( ) returns true (.T.) if the leftmost character of the specified character expression is a digit (0 through 9); otherwise, ISDIGIT( ) returns false (.F.)."

Para usar un código en un evento valid, debería ser algo así.
* Valid Event
IF !EMPTY(this.value)           && si está vacío al inicio, permite el paso
         this.value=CHRTRAN(this.value,CHRTRAN(this.Value,"1234567890",""),"") && quita todo o que no sea un número.
         IF EMPTY(this.value)         && sabemos que tenía algún valor y fué anulado por la operación anterior.
                  RETURN 0              && return to Thisform.TxtTalCosa    
         ENDIF
ENDIF

El martes, 12 de agosto de 2014 11:48:08 UTC-3, datamen escribió:

Buenos Dias

Espero esto te sirva.. en el Evento VALID puesdes poner esto :

IF !ISDIGIT(THIS.VALUE)

WAIT Windows "Digite solo Numeros" TIMEOUT 3

return(.F.)

ENDIF

Salu2

 

Wilber Juan Mendoza Quispe
Facilitador - Programador

Web Site  : www.sistemasdatamen.com

E...@il      : wjm...@sistemasdatamen.com

[Carlos Miguel FARIAS]

LO comentaron en otro post, porque no usar una máscara en el textbox?

[Fidel Charny]

Será porque es demasiado fácil y definitivo.
Lo que puse era solamente para advertir sobre ISDIGIT(). Por ejemplo ISDIGIT("9AZ") da .T. y no era eso lo requerido.