Programación General > Visual Basic para principiantes

 Insertar Texto

(1/1)

Daggoth:
Hola!!!!!!


Mi duda tal vez sea algo tonta, pero no se como resolverla :P  :P  :P .

Tengo un programa en el que una de las opciones es poder pegar texto en el cuadro destinado a ello (un textbox para ser mas exactos). Pues bien, mi duda viene a la hora de pegarlo. Se hacerlo pero solo lo consigo pegar al final de lo escrito y lo que yo quiero es poder colocar el texto en la linea en la que esta el cursor en ese momento y no al final salvo que yo le indique que lo haga en esa linea.

El codigo que uso es:

text1.text = text1.text & Clipboard.GetText

Se que asi solo consigo pegarlo al final respetando lo escrito anteriormente, pero yo quiero que a parte de respetar lo escrito, me pege el texto donde esta el cursor.




Mil gracias por adelantado!!!!!  :D  :D  :D

F_Tanori:
Hola


Esta es una manera espero te sirva



--- Código: Text ---Private Sub Command1_Click()    Dim ls_Antes as string    ls_Antes = Mid(Text1.Text, 1, Me.Text1.SelStart)    Text1.Text = ls_Antes & Clipboard.GetText & Mid(Text1.Text, Me.Text1.SelStart + 1)    Me.Text1.SelStart = Len(ls_Antes) + Len(Clipboard.GetText)    Me.Text1.SetFocusEnd Sub 

Saludos

Epa:
Buenas

Si no me equivoco con:

  Text1.SelText = Clipboard.GetText

alcanza.


Saludos  :hola:

F_Tanori:

--- Cita de: "Epa" ---Buenas
Si no me equivoco...
 
--- Fin de la cita ---
Pues no, no te equivocas y es evidente que es una solucion mejor, que tambien me sirve a mi :P pues yo no me sabia esa  :guitar:  :beer:



Saludos

Daggoth:
Gracias a los dos, las dos formas van genial.



Un saludo!!!!!!!!

Navegación

[0] Índice de Mensajes