result = filecontent.contains(...) or filecontent.contains(...)

result = result or filecontent.contains(item(i))

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

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

dim result as boolean = false
Dim sr As StreamReader = New StreamReader("C:\text.txt")
            filecontent = sr.ReadToEnd()
            sr.Close()
 
Select Case filecontent
Case "rot"
result = true
Case "gruen"
result = true
End Select

 Private Sub BackgroundWorker1_RunWorkerCompleted(ByVal sender As Object, ByVal _
   e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles _
   BackgroundWorker1.RunWorkerCompleted
 
if result = true then
label1.text = "Wort wurde gefunden!"
else
label1.text = "Nix gefunden!"
end if
 
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

public result as boolean = false

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

filecontent.Contains("rot")

if filecontent.contains("string") benutzen.

if filecontent.contains() = true or filecontent.contains() = true or usw. then
result = true
else
result = false

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist