Imports System, Microsoft.VisualBasic
Public Module Module1
Public Sub Main()
Dim total, finalcost, subtotal, discount As Single
Const TAX_RATE As Single = 0.06625
Console.WriteLine()
End Sub
End Module