Contoh Program Menghitung Jumlah Harga Pada VB.Net Console

 Contoh Program Menghitung Jumlah Harga Pada VB.Net Console
Module Module1

    Sub Main()
        Dim hasil As Integer
        Dim jb As Integer

        Console.Write("Masukan Jumlah Barang : ")
        jb = Console.ReadLine()
        Console.WriteLine("")

        If jb > 100 Then
            hasil = 0.8 * 20000 * jb
            Console.WriteLine("Diskon 20%")
        ElseIf jb > 10 Then
            hasil = 0.9 * 20000 * jb
            Console.WriteLine("Diskon 10 %")
        Else
            hasil = 20000 * jb
            Console.WriteLine("Anda Tidak Mendapat Diskon")
        End If
        Console.WriteLine("======================================")
        Console.WriteLine("Harga satuan = Rp 20000")
        Console.WriteLine("Jumlah Yang harus Dibayar: Rp {0}", hasil)
        Console.WriteLine("======================================")
        Console.WriteLine("")
        Console.WriteLine("")
        Console.WriteLine("          Terima Kasih")
        Console.WriteLine("          ============")
        Console.ReadLine()
    End Sub

End Module