
21/07/2009, 18:23
|
| | Fecha de Ingreso: agosto-2006
Mensajes: 45
Antigüedad: 18 años, 8 meses Puntos: 0 | |
Respuesta: Validar ingreso de dicimales Utiliza InStr para localizar la primera concurrencia del punto, luego con Mid extraes solo desde el punto + 2 digitos, hasta el principio del campo del numero.
Seria algo como esto:
campo = 123.56.54
b = InStr(1,campo,".")+2 'Te dara = 6
A=Mid(1,campo,b)
Se podia resumir asi:
campo = Mid(1,campo,InStr(1,campo,".")+2)
Ahora en A o en campo = 123.56
Creo que es +2, o puede que +3 prueba, consulta en la ayuda las intruciones:
Len, Mid y InStr para que lo entiendas. |