RichTextBox1.Lines.Length
- количество строк в тексте.Lines
- это массив всех строк, Length
- это количество элементов.
Между каждым из них находится символ Enviroment.NewLine
, который заставляет их перейти на новую строку.
Способ сделать это - удалить этого персонажа вручную.Самый простой способ - просто сложить строки вместе как строку и сделать это новым значением.Поместите это в кнопку 1:
Dim newLine As String = ""
For i = 0 To RichTextBox1.Lines.Length - 1
newLine = newLine & RichTextBox1.Lines(i)
Next
RichTextBox1.Text = newLine