Seleccionar Texto TextBox

[Korku]

Hola forer@s,

En VB6:

Private Sub Text1_GotFocus()
Me.Text1.SelStart = 0
Me.Text1.SelLength = Len(Me.Text1.Text)
End Sub

En VB.NET (2003):

Private Sub Text1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Text1.GotFocus
Me.Text1.SelectAll
End Sub

ó bien

Private Sub Text1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Text1.GotFocus
Me.Text1.SelectionStart = 0
Me.Text1.SelectionLength = Len(Me.Text1.Text.Length)
End Sub

Bien, resulta que en VB6 funciona la selección de texto en un TextBox (que aparezca el texto seleccionado en color azul) pero en VB.NET tanto .NET Framework como .NET Compact Framework (el caso de Pocket PC, al puntear con el stylus tiene que seleccionar) no funciona... ¿Alguna solución o sugerencia?

Gracias de antemano :)

[freegirl]

deberías ponerlo en el evento Enter del textbox:

Private Sub Text1_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Text1.Enter
Me.Text1.selectAll
End Sub

saludos

[Korku]

Hola freegirl,

¿Qué tal estás?, respecto a tu respuesta pues he probado con el evento Enter como tú dices y no funciona con el VB.NET (2003). También deberías saber que para .NET Compact Framework carece ese evento. ¿Te sugiere otra idea?

Saludos :)

[freegirl]

edito:

hay algo, pero nose si te servirá porque tampoco sé cuando quieres que te seleccione el texto...

por ejemplo, si fuera cuando el usuario pone el cursor con el ratón en la caja de texto puedes poner ese código en el evento "mouseEnter"...


PD: solo te hablo de VB 2003 y .Net Framework.

[Korku]

Hola de nuevo,

Bien, he probado con el VS2005 y funciona con el evento GetFocus y el método SelectAll.

Saludos

[Korku]

El tema de seleccionar el texto de un TextBox me está danto tremendos dolores de cabeza, lo que quiero exactamente es lo siguiente, cuando hay un texto en un TextBox, al pinchar un click encima de él que seleccione TODO (subrayado de color azul) el texto... Sólo funciona al pulsar el tabulador pero quiero que también que pinche con el ratón encima del TextBox...

¿Alguna manera?

Gracias de antemano

[JVSerrano]

Saludos Korku,
Prueba utilizando el evento MouseClick:

Private Sub TextBox1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseClick

'al pinchar con el ratón en el txbox seleccionar con azul el contenido de este
Me.TextBox1.SelectAll()

End Sub

[freegirl]

No creo que Korku esté atascado con ese problema desde 2006! jaja