FoxPro/Visual FoxPro - valores negativos

hola amigos.
la pregunta es como le hago para para que todos los textbox de mi form que reciben datos de tipo numerico, no reciban numeros negativos.

gracias

Lo mas facil seria usar clases y usar esa clase para los respectivos campos (asi no tendrias que escribir el mismo codigo en todos los texboxes).

Bueno, al grano pon esto en el evento keypress del textbox:

if nkeycode=43 .or. nkeycode=45

nodefault

endif

Con eso creo que esta resuelto el asunto, checa bien con las teclas.

Saludos

Puedes probar poniendo el valor asoluto de numero, pon esto en el lostfocus()
This.value = ABS(This.value)

Otra posibilidad =>
pone esto en el valid del cuadro de texto, y el foco quedará siempre en el objeto hasta que carges un valor positivo.

IF this.Value < 0 then
= MESSAGEBOX('No se puede ingresar valores negativos')
RETURN 0
ENDIF

Esperó que te sirva, suerte.