Imports System

Public Module Module1

    Public Sub Main()

        Dim S as string

        S = “Our greatest glory is not in never falling, but in rising every time we fall.”

        S.Split(" ")

        Console.WriteLine(S)

    End Sub

End Module