Ver Mensaje Individual
  #2 (permalink)  
Antiguo 15/05/2007, 16:23
Avatar de Kruzado
Kruzado
 
Fecha de Ingreso: marzo-2007
Mensajes: 307
Antigüedad: 18 años, 1 mes
Puntos: 17
Re: cambiar puntos por comas en txt e importarlo a mdb

zz=0
while zz <> 0
zz = InStr(1, tucadena, ".")
if zz > o then Mid(tucadena, zz, 1) = ","
wend

te explico el codigo
la funcion instr busca un caracter dentro de una cadena, en este caso una coma dentro de tucadena

si encuentra el caracter, zz asume el valor de la posicion donde encontro la cadena, si no la encuentra zz vale cero

mid rremplaza el caracter de la posicion zz por el punto.

este ciclo lo hace mientras zz no sea cero, cuando vale cero es porke ya no lo encontro mas en la cadena

espero sirva