Imports System

Public Module Module1

    Public Sub Main()

        Dim strFirstName as String = ""

        Dim strSurname as String = ""

        Console.writeline("what is your firstname?")

        strFirstName = console.readline()

        while strFirstName = ""  

            console.WriteLine("What is your firstname?")

            strFirstName = console.readline()

        End while 

        console.writeline("what is your last name")

        strSurname = console.readline()

        while strSurname = ""

            console.writeline("what is your last name")

            strSurname = console.readline()

        end while 

        Console.WriteLine("your full name is " & strFirstName + " " & strSurname)

    End Sub

End Module