Imports System

' Yogi Patel 

' 02/11/2021

' Name Breaker Program 

Public Module Module1

    Public Sub Main()

        Dim fullName As String 

        Dim lastName As String

        Dim firstName As String

        Dim num As Integer                                              ' Declared Variable 

        Console.Write("Enter your full name: ")

        fullName = Console.ReadLine()                                   ' User Input

        fullName = fullName.ToLower

        num = fullName.IndexOf(" ")

        firstName = fullName.Substring(0,num)

        lastName = fullName.Substring(num+1)                                ' Calculations

        Console.WriteLine("First name : " & firstName)

        Console.WriteLine("Last name : " & lastName)                    ' Output 

    End Sub

End Module