Imports System

Public Module Module1

    Public Sub Main()

        Dim name As String = "David Day"

        Dim age As Integer = 101

        Dim height As Double = 70.5 'Represented in inches

    End Sub

End Module