try this:
Code:Dim s As String = "abcdefghij" Dim a() As String = {"e", "a", "s", "y"} MsgBox(a.Any(Function(str) s.Contains(str)))
|
Results 1 to 9 of 9
Threaded View
|
Click Here to Expand Forum to Full Width |