Imports System
Imports System.Linq
Public Class Program
Public Shared Sub Main()
Dim s As String = "vb.net c++ java c python"
Dim N As Integer = 2
Dim words As String() = s.Split()
Dim first3 As String = String.Join(" ", words.Take(N))
Console.Write(first3)
End Sub
End Class
' run:
'
' vb.net c++
'