[Pytanie] USuwanie linijek z richtextbox

[StuSto]

Mam richtextbox i tam jest z 200 linijek jak zrobic ze np po wpisaniu do textbox np 156 i kliknieciu przycisku linijka się usuwała?

[Sunnyline2]

Mam richtextbox i tam jest z 200 linijek jak zrobic ze np po wpisaniu do textbox np 156 i kliknieciu przycisku linijka się usuwała?

Usuwa zaznaczony tekst:

 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim selected As String = RichTextBox1.SelectedText
        RichTextBox1.Text = (RichTextBox1.Text.Replace(selected, ""))
    End Sub
 

Tylko chciałem dać ritchtextbox1.text.remove ale coś się jebie i mi o integery errory wywala ;D pewnie usuwa linijki lub coś..

ps. myślę ze zaznaczony tekst prościej usunąć niż podawać linijkę.

[StuSto]

Usuwa zaznaczony tekst:

 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim selected As String = RichTextBox1.SelectedText
        RichTextBox1.Text = (RichTextBox1.Text.Replace(selected, ""))
    End Sub
 

Tylko chciałem dać ritchtextbox1.text.remove ale coś się jebie i mi o integery errory wywala ;D pewnie usuwa linijki lub coś..

ps. myślę ze zaznaczony tekst prościej usunąć niż podawać linijkę.

 

Ok al ldziała tylko jak usunac to przerwe ?

Bo robie tak:

txt1

txt2

txt3

 

usuwam txt

zostaje:

txt1

 

txt3

 

i jak usunac ta przerwe?

[†Pietia]

spróbuj tak:

 

 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim selected As String = RichTextBox1.SelectedText
        RichTextBox1.Text = (RichTextBox1.Text.Replace(selected + "\n", ""))
    End Sub
 

 

@@To nie wiem, zbytnio na vb się nie znam.

[StuSto]

@up ten kod wgl nei dziala