Ver Mensaje Individual
  #13 (permalink)  
Antiguo 29/04/2010, 17:13
hunter18
 
Fecha de Ingreso: junio-2008
Mensajes: 343
Antigüedad: 15 años, 10 meses
Puntos: 4
Respuesta: Evitar seleccionar contenido de un Text1

T3rriMan el codigo funciona correctamente y cumple 100% con lo deseado pero no quiesiera utilizar un timer ni el simbolo "|" ya que si se trata del cursor y no de una simulacion de cursor como lo planteo ERBUSON, si se te ocurre otra idea para solucionar esto y sin desabilitar el TextBox seria bueno, igual me sorprendio la forma en que lo resolviste.

Algo sencillo seria asi, pero aqui me permite seleccionar texto y eso no me gusta aunque tambien soluciona el problema.

Si hay mas idea espero la compartan con este novato.

Código:
Private Sub RichTextBox1_GotFocus()
RichTextBox1.SelStart = Len(RichTextBox1.Text)
End Sub
 
Private Sub RichTextBox1_KeyUp(KeyCode As Integer, Shift As Integer)
RichTextBox1.SelStart = Len(RichTextBox1.Text)
End Sub

Private Sub RichTextBox1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
RichTextBox1.SelStart = Len(RichTextBox1.Text)
End Sub