
15/05/2007, 16:23
|
 | | | 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 |