VB.NET删除文本框的第一行

Question

如何在按下按钮上删除文本框的第一行？

Answer 1

Try this :

  Dim b As String() = Split(TextBox1.Text, vbNewLine)

  TextBox1.Text = String.Join(vbNewLine, b, 1, b.Length - 1)

See String.Join for reference .

Answer 2

fairly easy:

Private Sub bttnFirstLine_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bttnFirstLine.Click
        txtBox.Text = txtBox.Text.Substring(txtBox.Text.IndexOf(vbCrLf))
end sub

or

Private Sub bttnFirstLine_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bttnFirstLine.Click
            dim myString = txtBox.text
            txtBox.Text = myString.Substring(myString.IndexOf(vbCrLf))
    end sub