multi line textbox
i wish to add <br> front of all text
Private Sub Text21_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then ' The ENTER key.
Text21.Text = "<br>"
End If
End Sub
demo
once upon a time (i hit enter hey here ) <br> there was a tiger i love it alot (i hit enter hey here ) <br> that night was so good
output results
once upon a time <br> there was a tiger i love it alot <br> that night was so good
how do i do that i wish to add <br> front of current strings when enter key is hit
i wish to add <br> front of all text
Quote:
Private Sub Text21_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then ' The ENTER key.
Text21.Text = "<br>"
End If
End Sub
once upon a time (i hit enter hey here ) <br> there was a tiger i love it alot (i hit enter hey here ) <br> that night was so good
output results
once upon a time <br> there was a tiger i love it alot <br> that night was so good
how do i do that i wish to add <br> front of current strings when enter key is hit