Mensajes

gracias pero no tengo ni iedea de como hacer eso ;/

hola tengo una pregunta que no se resolverla
tengo un textbox1 multilinea y necesito remplazar el texto de la linea 5(por ejemplo)  del texbox1 en otro textbox2 por medio de un boton.

el codigo de remplace es este

Código [Seleccionar] Expandir

Private Sub Command1_Click()
textbox2.Text = Replace(textbox1.Text, "blabla", "line5")
End Sub

el codigo quedaria algo asi pero no se como decirle que me remplace la linea 5 del texbox1(multilinea) en el texbox2

ESPERO QUE ALGUIEN ME PUEDA AYUDAR GRACIAS!!!

gracias tio por tu respuesta solucionado!

no entiendo nah. pero lo estoy pensando ^^ si puedes indicame un poco mas
gracias por tu repuesta

hola compis algui sabe como pasar numeros con decimales a fraccion
poe ejemplo

este numero 1,3862727272727272727272727272727
es igual a esta fraccion 731952/528000
quiero expresar el numero en fracion y cuando al dividir la fracion el numero sea el mismo espero q me entiendan gracias 

gracias por tu ayuda Novlucker ya lo porobe y lo adacte con la funcion  replace y funcion bien 

Código [Seleccionar] Expandir

Dim Centrar As Integer
Dim Espacios As String

Centrar = (30 - Len(Text1.Text)) / 2
Espacios = String(Centrar, " ")
Text2.Text = "[" & Espacios & Text1.Text & Espacios & "]"

'titulo
largo = Len(Text2.Text)
busco = "->"
For i = 0 To largo Step 1
busco = busco & " "
Next
txt3.Text = Replace(txt3.Text, "[", " ")
txt3.Text = Replace(txt3.Text, "]", " ")
txt3 = Replace(txt3.Text, busco, "-> " & Text2.Text)

bueno con eso consegui remplazarlo donde quiero y centrado mas o menos tampoco tiene que ser al milimetro con esto me conformo thx for all

bueno he pensado esto
               
[                                                     ]  ->maximo de letras  q se puede ingresar entre los margenes [] es 30

un ejemplo las palabra que quiero centrar es: hola ->que tiene 4 letras

entoces calculo los espacios que tengo que añadir para que la palabra quede centrada

si el maximo de letras que permite es 30 y la palabra a remplazar tiene 4 letras

30-4=26espacios

entonces si divido 26/2 = 13espacios para la izquierda y otros 13 para la derecha

entonces quedaria asi.

[1234567890123HOLA1234567890123]

los numero que puse serian espacios

asi con espacios los margenes se mantendrian en su lugar y se centraria la palabra a remplazar con los espacios calculados para la derecha y para la izquierda

bueno compañeros no se si la lie mas o menos pero es como lo razone lo que no se es el codigo espero que me ayuden de nuevo ^^

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

 

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

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