Imports System
Imports System.Linq
Public Class Program
Public Shared Sub Main()
Dim array = New String() {"java", "c", "c sharp", "c++", "vb.net", "javascript"}
Dim result = array.Where(Function(word) word.Contains("a"c))
For Each word In result
Console.WriteLine(word)
Next
End Sub
End Class
' run:
'
' java
' c sharp
' javascript
'