Access - Reemplazar texto en una cadena con Access 97

Buenas tardes a todos.

Tengo un campo que tiene la información de esta manera 1-22-34-8-0000 y necesito mediante una consulta de access 97 dejarlo de esta forma 1223480000. La función Replace en Access 97 no funciona y no encuentro la manera de poder hacerlo. Necesito saber como hacerlo.

Muchas gracias por adelantado

Un cordial saludo

no le pego mucho al vba pero esto es basic prehistorico
tal vez funcione...

Dim ch, txt, txtF as string
Dim i, largo as single

txt = (aqui pones la ref. al campo)
txtF= ""
largo = len(txt)

for i = 1 to largo
ch = mid(txt,i,1)
if ch = "-" then
' nada
else
txtF = txtF & ch
end if
next

Muchas gracias por tu interes, pero el reemplazar lo tengo que hacer en una consulta de access97 y que al ejecutar dicha consulta me deje la información como necesito.

Seguramente esto te sirve: http://accessvbafaq.mvps.org/item.asp?pagina=6

Luego en la consulta tendrás que crear un campo calculado, más o menos así:

MiCampoCalculado: Replace ([MiCampo];"Cadena de texto";"Resutado que quiero")

Seguramente también te habría valido el código de JMAN si lo hubieras convertido en función y usado de la misma manera.

Saludos
José Bengoechea Ibaceta

¿y no se puede hacer: buscar y reemplazar "-" por ""?

ESPERO QUE ESTO TE SIRVA ASI LO HAGO

Me.NUMERO = Replace(Me.NUMERO, "-", "")