Filter koppeln

[queckjunior]

Hallo

ich löse beim Verlassen eines Feldes einen Filter aus:

Private Sub suche_projekt_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles suche_projekt.Leave
        Me.ProjektMailsBindingSource.Filter = String.Format("Projekt Like '%{0}%'", suche_projekt.Text)
    End Sub

Ich möchte diesen Filter gerne mit anderen Filtern koppel/kombinieren. Ich habe schon versucht

Private Sub suche_projekt_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles suche_projekt.Leave
        Me.ProjektMailsBindingSource.Filter = String.Format("Projekt Like '%{0}%'", suche_projekt.Text and Me.ProjektMailsBindingSource.Filter = String.Format("Subject Like '%{0}%'", suche_subject.Text)
    End Sub

funktioniert aber absolut nicht. Was mache ich falsch ?

Danke!

Mark B

[queckjunior]

so funktioniert es

habe es gefunden mit anderer Hilfe:

Me.ProjektMailsBindingSource.Filter = String.Format("Projekt Like '%" & suche_projekt.Text & "%' AND Subjekt Like '%" & suche_subject.Text & "%' AND von Like '%" & suche_von.Text & "%' AND an Like '%" & suche_an.Text & "%' AND body Like '%" & suche_body.Text & "%' ")

Ist halt ein Elend mit den Hochkommas und den doppelten Hochkommas.

Vielleicht hilft es jemandem.

Mark B