Imports System
Imports System.Linq
Imports System.Collections.Generic
Public Class Program
Public Shared Sub Main(ByVal args As String())
Dim lst As List(Of String) = New List(Of String) From {
"python",
"c",
"c++",
"c#",
"java",
"vb",
"php",
"nodejs",
"ada"
}
Dim threeLetter_words As List(Of String) = lst.Where(Function(word) word.Length = 3).ToList()
Console.WriteLine(String.Join(", ", threeLetter_words))
End Sub
End Class
' run:
'
' c++, php, ada
'