Public Module Example
Sub Main()
Dim sentence As String = "this is a test"
Dim startPosition As Integer = sentence.IndexOf(" ") + 1
Dim word2 As String = sentence.Substring(startPosition,
sentence.IndexOf(" ", startPosition) - startPosition)
Console.WriteLine("Second word: " + word2)
End Sub
End Module