VB.net

ALGORITMA DAN PEMROGRAMAN #Array# Looping#Search Engine

Mari kita membuat kasir sendiri tanpa harus ribet memakai kalkulator sudah tidak jaman nya kawan

Pengenalan Visual Basic

Visual Basic atau sering yang kita dengan sebutan VB , Visual basic merupakan turunan bahasa Pemprograman Basic berbasis Grafik Cepat. para Programmer dapat membangun aplikasi dengan menggunakan komponen yang terdapat pada Visual Basic .

Bahasa Basic diciptakan oleh professor John Kemeny dan Thomas eugene. Yang dimana penggunaanya menggunakan bahasa inggris dan harus mengusai bahasa pemprogram C++. Contoh aplikasi yang dapat kita buat adalah aplikasi Media Player, Kalkulator dan lain-lain.

Para pemula pembuat program dimulai dari menggunakan Visual Basic Apabila telah menguasai Bahasa Pemprograman di Visual Basic otomatis kalian akan lebih mudah menguasai bahasa pemprograman yang lainnya karena di Visual basic telah ada dasar seperti JavaScript .

Disini saya akan memperlihatkan cara membuat Aplikasi Media Player Sederhana menggunakan Visual basic ini bisa dikatakan hal yang mudah karena, hanya perlu menggunakan satu Script maka akan berjalan seperti pemutar media yang sering kita gunakan seperti Vlc Media Player, KMP Player ,GOM dll.

Walau memang yang kita buat ini tidak sebagus yang kita gunakan di PC kita tapi inilah buatan kita sendiri dan itulah seni kita . Sebelum itu, Silahkan disedot  Microsoft Visual Basic V.6.0 -Nya. dan juga Ebook Visual Basic untuk mempermudah sobat-sobat mempelajari dari dasar "Apa itu Visual Basic".

buka software visual basic kalian

Lalu klik new project

console aplication

untuk kali saya akan menggunakan console aplication, kalian bisa memilih selain console aplication yang lebih cocok dengan kalian.

input script

masukkan script berikut di bawah ini :

setelah itu start

Module Module1

    Sub Main()
        Dim barang(4) As String
        Dim harga (4) As String
        Dim indeks As Integer
        Dim total As Integer
        Dim cari As String
        Dim ketemu As Boolean
        ketemu = False

        indeks = 0
        While indeks < 5
            Console.Write("Masukkan nama barang  {0} :", indeks + 1)
            barang(indeks) = Console.ReadLine()
            indeks = indeks + 1
        End While
        Console.WriteLine()
        indeks = 0

            While indeks < 5
            Console.Write("Masukkan harga barang {0} :", indeks + 1)
            harga(indeks) = Console.ReadLine()
            indeks = indeks + 1

        End While
        Console.WriteLine()
        indeks = 0

        While indeks < 5
            Console.WriteLine("Barang {0} adalah {1}", barang(indeks), harga(indeks))
            total = total + harga(indeks)
            indeks = indeks + 1

        End While
        Console.Write("Total harga adalah : {0}", total)
        Console.WriteLine()
        Console.Write("Masukkan barang yang dicari :")
        cari = Console.ReadLine()
        ketemu = False

        indeks = 0
        While indeks < 5
            If barang(indeks) = cari Then
                Console.WriteLine("Barang {0} ditemukan dengan harga {1}", barang(indeks), harga(indeks))
                ketemu = True
            End If

            indeks = indeks + 1

        End While
        If ketemu = False Then
            Console.WriteLine("Barang tidak ditemukan")
        End If
        Console.ReadLine()
    End Sub

End Module

ini hasil output coding kita tadi

console output