Imports Microsoft.VisualBasic
dim arr1() as string = {"New York","Chicago","Los Angeles","San Fransisco"}
console.writeline(Array.Find(arr1,Function(x)(x.StartsWith("New"))))
dim arr2() as string = Array.FindAll(arr1,Function(x)(x.length>8))
console.writeline(String.Join(", ",arr2))
dim numbers() as integer = {1,2,3,4,5,6,7,8,9,10}
console.writeline(String.Join(", ",Array.FindAll(numbers,Function(x)(x>5))))
console.writeline(UBound(Array.FindAll(numbers,Function(x)(x>5))))