Imports System

Public Module Module1

    Public Sub Main()

        dim num, largest as double

        largest = -99999999999.9999999999

        Console.WriteLine("Please enter three numbers")

    End Sub

End Module