Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Hey, Sandra! Here at PavingCosts4You, we do the simple calculations you can't be bothered to do for you. Please enter the number of slabs across:")

        Console.ReadLine()

        Dim SlabsAcross = Console.ReadLine()

        Console.WriteLine("You entered" & SlabsAcross & ", Is this right? Please enter 'Yes' or 'No':")

        Console.ReadLine() 

    End Sub

End Module