replace texto centrado

[andrer03]

bueno al funcion replace la conozco no se como remplasar el texto de un texbox
en texto plano previamente cargado  en el que como margenes tengo este texto de aqui devajo

Código [Seleccionar] Expandir


[          aqui.texto.centrado.a.remplazar         ]


help me alguien ^^

[<[(x)]>]

holas

te sirve algo así?

Código [Seleccionar] Expandir

Dim strCadena As String: strCadena = "[         aqui.texto.centrado.a.remplazar         ]"
Dim strRep As String: strRep = "holasss-locos"
Dim strR As String, strL As String
Dim strOut As String

strR = Right(strCadena, 10)
strL = Left(strCadena, 10)
strOut = strL & strRep & strR

Debug.Print strCadena
Debug.Print strOut

[andrer03]

no pero gracias eso no es lo que busco quiero remplazae el texto de un texbox

en otro texbox centrado en el texbox a remplazar tengo

[             aqui.el.texto.del.texbox.1                           ]

por medio de un boton

[jdc]

dale la propiedad center a un text y en el boton pones la condicion para cambiar texto

o explicate mejor xD

[Dessa]

TRIM

[andrer03]

hmm

no se me entiende ggg

vamos a ver si esta vez

tengo estas cosas en mi from
boton
texbox1
texbox2

en el textbox2 tengo cargado este texto

Código [Seleccionar] Expandir


[          aqui.texto.centrado.a.remplazar         ]


ahora quiero remplazar el texto del texbox1 en el textbox2 por medio de un boton
pero que se remplace centrado y como margenes estoy usando [ ] bueno espero que estas vez me entiendan y me ayuden grascias por las respuestas recividas asta ahora

[Dessa]

Si la parte central de la cadena (la que quieres rescatar) nunca va a tener espacios podes usar replace

cadena = "[          aqui.texto.centrado.a.remplazar         ]"
MsgBox cadena
cadena = Replace(cadena, " ", "")
MsgBox cadena

[andrer03]

 

es el que el texto que remplaze tiene que remplazarse en la mitad y los margenes mantenerce en su sitio pero bueno es igual paso de añadirle esto a mi tool gracias por las respuesta

[Dessa]

Lo podes hacer calculando el Len de la cadena inicial y el len de la cadena modificada

saludos

EDIT: doy por seguro que los texbox tienen la propiedad Alignment = 2 (center)

[andrer03]

no por que hay mas texto en el texbox2 y si lo pongo centrado lo destrozo a todo y quiero hacer esto en  una linea de el texto cargado en el texbox2