Mascara de entrada

[caritaje]

Que tal buenos días!!

Estoy trabajando en una sistema en access que lleva registros de kilometrajes, pero deben ser reflejados de la siguiente forma 1+256.25, pero no podria ser de esta forma #+###.## ya que pueden haber killometrajes asi 100+256.25 o 25+365.25, pense en guardalos como texto pero luego me tope con que necesito hacer operaciones con esos numeros (sumar, restar,..), asi que necesito que se guarden como numero o tal vez podria extraer los numeros de la cadena de texto, pero no se como hacerlo..

como se podran dar cuenta estoy echo bolas, si alguien puede ayudarme por favor estaria muy agradecido..

Buen día!!

[pkj]

Puedes guardarlo como texto y crearte funciones que devuelvan la parte que quieras del texto.

Ejm: una función que extrae la parte anterior al +

Código vb:

Function ExtrP1(Cadena As String) As Integer
    ExtrP1 = Left$(Cadena, InStr(1, Cadena, "+"))
End Function
 

MsgBox ExtrP1("25+365.25")
esto devuelve el primer 25 en formato Integer

o una funcion que devuelva un integer con cualquiera de las 3 partes del texto:

Código vb:

Function Extrae(Cadena As String, NumDato As Integer) As Integer
  Select Case NumDato
    Case 1:
      Extrae = Left$(Cadena, InStr(1, Cadena, "+"))
    Case 2:
      Extrae = Mid$(Cadena, InStr(1, Cadena, "+") + 1, Len(Cadena) - InStrRev(Cadena, ".") + 1)
    Case 3:
      Extrae = Mid$(Cadena, InStrRev(Cadena, ".") + 1)
    Case Else
      MsgBox "Número de dato inválido"
  End Select
End Function
 

MsgBox Extrae("25+365.25", 2)
Esto devuelve el 365 en Integer

Este es un modo. Todo depende de como tienes el dato en principio y que partes necesitas usar después.

Suerte

[caritaje]

antes que nada, gracias por contestar..

lo que quiero extraer son todos los numeros 25+365.69 quedaria 25365.69..

tratare de usar esas funciones que explicas con contenaciones a ver si sale..

[pkj]

Eso se puede hacer con un reemplazo de texto. Reemplazamos el signo "+" por un texto vacio "" y ya está:

Texto = "25+365.69"
Texto = Replace(Texto, "+", "")

y ya tienes en texto el "25365.69"

[caritaje]

Muchas gracias PKJ..