Public myListe As List(Of String)
Public Sub FillMyListe()
    myListe.Add("Wert1")
    myListe.Add("Wert2")
End Sub

dim sWert as String
sWert= "Wert3"
FillMyListe
if myListe.Exists(sWert) = True then
...
end if

---------------------------------------------------------------------------------------------------------------
Wissen ist Macht, aber nichts wissen macht nichts!