How to add a New Line to Existing Text Box Text Programmatically

Home » Controls » How to add a New Line to Existing Text Box Text Programmatically

How to add a New Line to Existing Text Box Text Programmatically

Posted on January 5, 2009

'Controls - How to add a New Line to Existing Text Box Text Programmatically

Option Explicit
 
Private Sub Command1_Click()
    Dim NewText As String
    With Text1
        NewText = "My New Text"
        .SelStart = Len(.Text)
        .SelText = vbNewLine & NewText
    End With
End Sub
 
Private Sub Form_Load()
    Text1.Text = "My Initial Text"
End Sub