Write a program to identify Volume of Box class,with three data member,l,b,h. in Vb.net

Module Module1

    Class Box

        Public l, b, h As Double

    End Class

    Sub Main()

        Dim Box1 As Box = New Box()

        Dim Volume As Double = 0.0

        Box1.h = 5.0

        Box1.l = 6.0

        Box1.b = 7.0

        Volume = Box1.h * Box1.l * Box1.b

        Console.Write("Volume of Box1:{0}", Volume)

        Console.ReadKey()

    End Sub

End Module

O/P:

Volume of Box1=210