[Pytanie] Usuwanie linijek z textboxu

[d'emploi]

W textboxie mam 1000 linijek tekstu. Jak zrobić aby

 

Jeżeli w linijce jest wyraz "dom" to wtedy usuwa tą linijkę:

 

Czyli

Textbox1.text wygląda tak:

 

obraz jest ładny

dom jest ładny

okno jest ładne

 

Po kliknieciu w button

obraz jest ładny

okno jest ładne

[Gość]

Lista TextBox.Lines pozwoli Ci to wykonać.

[d'emploi]

Ale ja textbox co chwile zmieniam..

[Gość]

Ale ja textbox co chwile zmieniam..

Każda klasa dziedzicząca z TextBoxBase ma tę właściwość.

[Maciek2699]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim lista As New List(Of String)(TextBox1.Text.Split(Environment.NewLine))

Dim sb As New StringBuilder

For Each linia In lista

If Not linia.Contains("dom") Then

sb.AppendLine(linia)

End If

Next

TextBox1.Text = sb.ToString

End Sub

[d'emploi]

Dostaje error:

Type 'StringBuilder' is not defined

[Maciek2699]

zaimportuj sytem.text

 

zeby nie bylo, bo widze ze sherlock holmes to ty raczej nie jestes, na samej górze wpisz Imports System.Text, nad Public Class Form1(czy jak tam sobie forme nazwales)

[d'emploi]

Wszystko działa. Do zamkniecia.