Data Type VB.Net Tutorial

public class Test
   public Shared Sub Main
        Dim Amount As Single
        Dim Discount As Single
        Dim DiscAmount As Single
        Amount = 24500
        Discount = 0.35
        DiscAmount = Amount * (1 - Discount)
        Console.WriteLine("Your price is: $" & DiscAmount)
   End Sub
End class
Your price is: $15925