Ver Mensaje Individual
  #2 (permalink)  
Antiguo 21/07/2009, 18:23
F_rank_cisco
 
Fecha de Ingreso: agosto-2006
Mensajes: 45
Antigüedad: 17 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.