Imports System
Public Class CalculateVolumeBox_VB_NET
Public Shared Sub Main(ByVal args As String())
Dim l As Integer = 50, w As Integer = 21, h As Integer = 15
Dim boxvolume As Integer = l * w * h
Console.WriteLine("box volume = {0} cm^3", boxvolume)
End Sub
End Class
' run:
'
' box volume = 15750 cm^3
'