Sabtu

Belajar VB.Net Bagian 8 : Select Case


Ok sekarang kita masuk ke pembelajar vb.net bagian 8. Setelah pada tutorial sebelumnya kita sudah mempelajari mengenai kondisional if… else… sekarang kita akan mempelajari tentang select case. Jadi langsung aja buat sebuah project vb.net baru lalu beri nama tut7.

Tambahkan 1 buah comboBox sama 1 buah Button lalu rubah masing-masing propertiesnya menjadi seperti berikut ini :

ComboBox 1:
Name = cmbGitaris
Items = Slash
                Kurt Cobain
                Abdee

Button 1:
Name = btnOk
Text = OK

OK sekarang klik 2 kali tombol btnOK untuk mulai menuliskan code programnya. Kalo udah kebuka tambahin codenya seperti berikut ini :

Public Class Form1

    Private Sub btnOk_Click(sender As Object, e As EventArgs) Handles btnOk.Click
        Dim gitaris As String
        gitaris = cmbGitaris.Text.ToUpper

        Select Case gitaris
            Case "SLASH"
                MsgBox("Slash merupakan mantan gitaris GnR")
            Case "KURT COBAIN"
                MsgBox("Kurt Cobain merupakan gitaris Nirvana")
            Case "ABDEE"
                MsgBox("Abdee merupakan gitaris Slank")
        End Select

    End Sub
End Class

Sekarang kita bahas dulu code diatas. Pertama kita membuat sebuah variable baru dengan nama gitaris yang memiliki nilai string, dimana variable tersebut mengambil nilai berdasarkan nilai yang ada comboBox. Setelah itu  kita mulai kondisional select casenya dimana nilainya diambil berdasarkan nilai yang ada pada variable gitaris.

Pada case pertama yaitu “SLASH” visual studio akan mengecek apakah nilai slash merupakan nilai yang sesuai dengan yang ada pada variable gitaris, bila bukan maka case selanjutnya yaitu “KURT COBAIN” akan di cek. Begitu seterusnya sampai didapat nilai yang sesuai.

Sekarang coba jalankan aplikasi vn.netnya maka tampilannya akan menjadi seperti berikut ini :


Ok kita telah selesai membuat program berdasarkan logika kondisional select case. Semoga bermanfaat ya dan sampai jumpa pada tutorial belajar vb.net selanjutnya.

0 comments

Posting Komentar

Silahkan Berikan Komentar Anda Disini.

Ping your blog, website, or RSS feed for Free