quitar vbnewline

[pepepf]

gracias por las respuestas

he conseguido hacer lo q quería mediante localización del "vbnewline" de esta forma

dim localiza_enter as integer
dim cadena1_sin_enter as string
dim cadena2_sin_enter as string
dim cadena_resultante as string


localiza_enter=instr(1,text1.text,vbnewline)

de esta forma ya tengo la posición de la cadena donde se encuentra lo q buscaba y ahora simplemente quitarlo

cadena1_sin_enter =mid(text1.text,1,localiza_enter)
cadena2_sin_enter=mid(text1.text,localiza_enter+1, len(text1.text)
cadena_resultante=cadena1_sin_enter & " " & cadena2_sin_enter

problema solucionado