30/12/2003, 02:37
|
 | | | Fecha de Ingreso: mayo-2002 Ubicación: Lima, Peru
Mensajes: 4.619
Antigüedad: 22 años, 11 meses Puntos: 7 | |
| se me ocurre, en el lostfocus
if not isnumeric(text1.text) then text1.text="40"
'asegurandonos de que sea un valor numerico
if cdbl(text1.text)<40 then text1.text="40"
'valor minimo 40
if cdbl(text1.text)>100 then text1.text="100"
'valor maximo 100
text1.text=format(text1.text,"#0.00")
__________________
No tengo firma ahora... :( |