public class Test public Shared Sub Main Dim s1 As New String("Greeting") Console.WriteLine(s1.IndexOfAny("tin")) End SubEnd class 4