Membuat Perulangan transaksi Bank di Visual Studio 2012 Console Aplication

Membuat Perulangan di Visual Studio 2012 di Console Aplication

Hello semua kali ini saya akan bagi bagikan kalian semua ilmu yang boleh di katakan lumayan bermanfaat bagi kalian yang ingin belajar pemrograman di visual studio 2012, karena semakin banyaknya pelajar - pelajar sekarang yang mengambil jurusan pemrograman, apalagi yang belajarnya menggunakan visual studio 2012.
Oke dan kali ini saya akan ngeshare tentang perulangan do loop while yang kebanyakan membuat para pelajar bingung, yaitu tentang bagaimana cara transaksi di bank yang sangat simple sekali buat para pemula.
baiklah langsung aja tanpa basa basi kali ini mari sama - sama kita ucap bismillah.

tampilan awal saldo = Rp.0 dan user di beri pilihan dan user memilih 0

Module Module1

    Sub Main()
        Dim s, t, st As Double, j As Byte, jwb As Char
        jwb = "y"
        s = 0
        Do
            Console.Clear()
            Console.WriteLine("Saldo anda sekarang Rp." & s)
            Console.Write("Masukkan jenis transaksi [0.menyetor/1.menarik] : ") : j = Console.ReadLine
            Console.WriteLine()
            If j = 0 Then
                Console.Clear()
                Console.Write("Masukkan jumlah setoran anda : ") : st = Console.ReadLine
                s += st
            ElseIf j = 1 Then
                Console.Clear()
                Console.Write("Masukkan jumlah tarikan : ") : t = Console.ReadLine

                If s - t < 10000 Then
                    Console.Clear()
                    Console.WriteLine()
                    Console.WriteLine("Maaf saldo anda tidak cukup, saldo minimal harus Rp.10.000")
                    Console.WriteLine()
                ElseIf t <= s Then
                    s -= t
                End If
                Console.WriteLine()
                If j = 0 Then
                    Console.Clear()
                    Console.WriteLine("Anda telah melakukan setoran sebesar " & st)
                    Console.WriteLine()
                    Console.WriteLine()
                    Console.WriteLine("Saldo anda sekarang Rp." & s)
                    Console.WriteLine()
                ElseIf j = 1 And s <= 10000 Then
                    Console.WriteLine("Saldo anda sekarang Rp." & s)
                    Console.WriteLine()
                ElseIf j = 1 And s > 10000 Then
                    Console.WriteLine("Anda telah melakukan tarikan sebesar Rp." & t)
                    Console.WriteLine()
                    Console.WriteLine()
                    Console.WriteLine("Saldo = Rp." & s)
                    Console.WriteLine()
                End If
            End If
            Console.Write("Apakah anda masih ingin melakukan transaksi [y/t] ? ") : jwb = Console.ReadLine
            Console.WriteLine()
        Loop While jwb = "y"
     End Sub
End Module

pada halaman awal user memilih 0 dan tampil halaman ini

halaman ini user menginputkan saldo yang akan user setor dan pada gambar di atas user menginput 100000 , kemudian user di beri pilihan untuk melakukan transaksi lagi atau ingin tutup program dengan menginput "y" untuk lanjut dan "t" untuk menutup program

setelah memilih ya pada gambar di atas maka akan tampil halaman ini

Pada gambar di atas program menampilkan jumlah saldo user dan memberikan pilihan lagi ke user untuk menyetor atau menarik uang.

User menginput angka satu sebagai tanda akan melakukan penarikan

User melakukan penarikan sebesar 50000

Program menampilkan sisa saldo user

Gambar di atas memberilkan informasi saldo user setelah melakukan tarikan 50000 yang sebelumnya saldo user adalah 100000.

Informasi bahwa penarikan batal

gambar di atas user kembali melakukan penarikan sebesr 45000 dari saldo yang tersisa sebelumnya adalah 50000 namu program tidak mengizinkan user melakukan penarikan karena saldo minimal yang harus tinggal adalah 10000.

Terima kasih telah mengunjungi blog saya....

Selamat Mencoba :-)

Tweet