Cursor in TextBox oder RichTextBox positionieren (VB 2005) VB-Version:  VB.NET
	Views:  847

Den Cursor beim Start des Programms ans Ende des geladenen Textes zu setzen funktioniert in VB 2005 nicht viel anders als früher in VB 6: nämlich über die TextLength-Eigenschaft. Setzen Sie auf eine Form eine TextBox mit dem TabIndex 0, damit die TextBox beim Starten des Beispiels sofort den Focus erhält, und fügen Sie diesen Code in das Form_Load-Ereignis ein:

Public Class Form1
 
  Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
 
    With TextBox1
      .Text = "Cursor soll beim Laden am Ende des Textes stehen."
      .SelectionStart = .TextLength
    End With
  End Sub
 
End Class

Genau gleich funktioniert das mit der RichTextBox:

Public Class Form1
 
  Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
 
    With RichTextBox1
      .Text = "Cursor soll beim Laden am Ende des Textes stehen."
     .SelectionStart = .TextLength
    End With
  End Sub
 
End Class