Cara Membuat Quiz Di Microsoft Visual Studio

Selamat malam sobat ? Wah, ga nyangka nih, kita ketemu lagi :D Hehe :v Pada kesempatan kali ini, Admin akan mengajarkan cara membuat Quiz di Visual Studio. Sebelumnya sudah pernah Admin Posting Cara Membuat Calculator dan Bikin Software Hack Ramadhan. Untuk yang belum tahu bisa Klik Link tersebut.

Sebenernya Admin pada malam ini ga ada kerjaan, jadi ya bikin Project aja, ditambah lagi Jadwal Film yang kosong, waduhh :v Admin ini orangnya "Pantang Download Sebelum Bluray" :D Jadi ya sabar aja untuk menunggu Jadwal Rilis Film yang sudah Bluray. Biasanya sih jam jam segini kalo ada Jadwal ya Download Download, tapi karena ga ada ya Admin ngeBlog aja :D

Pernah ikutan Quis di Website Website ? Kalau pernah, ya Admin cuma tanya aja sih, hehe :D Kalau yang ini Quis versi Software sobat. Lebih banyak lagi hadiah hadiah yang dapat dimiliki jika sobat mampu menjawab dengan benar :v wkwkwk

Penasaran seperti apa, dan bagaimana cara membuatnya ? Simak Tutorialnya dibawah in Sob !!!

Tapi sebelumnya sih Sobat harus punya Softwarenya, yaitu Microsoft Visual Studio 2005. Kalau belum punya silahkan cari di Google atau minta ke Guru TKJ sobat :D

1. Desain Halaman Utama seperti Gambar dibawah ini sebagai contoh saja, Sobat dapat menggantinya sesuai dengan selera. Setelah Desain pada Form1 selesai, silahkan klik 2x pada Button 1 dan ketik Codingannya seperti ini: Form2.show() . Jika masih bingung untuk Codingnya bisa dilihat Gambar dibawahnya

2. Kalau sudah mengisi Codingnya, sekarang sobat bikin Form2 nya. Klik Ikon seperti gambar dibawah ini kemudian klik Add

3. Tahap selanjutnya yaitu mendesain lagi tampilan pada Quisnya. Jika sudah di Desain sobat ikuti tahap selanjutnya lagi, yaitu mengisi Coding pada Button tersebut. Disini dianjurkan pada Button Hint Answer merupakan BUTTON 1 dan Button pada A, B, C, D adalah BUTTON 2, 3, 4, 5

- Untuk Button Hint Answer:

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        If Button1.Text = " " Then

        Else

            MsgBox("Jawabannya adalah A. Windows 10", , "KETERANGAN")

        End If

    End Sub

- Untuk Button2 (A):

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        If Button2.Text = " " Then

        Else

            MsgBox("Jawaban Anda benar, lanjutkan soal berikutnya", , "KETERANGAN")

        End If

        form3.show()

    End Sub

- Untuk Button3 (B):

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        If Button3.Text = " " Then

        Else

            MsgBox("Jawaban Anda salah", , "KETERANGAN")

        End If

    End Sub

-Untuk Button4 (C):

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

        If Button4.Text = " " Then

        Else

            MsgBox("Jawaban Anda salah", , "KETERANGAN")

        End If

    End Sub

-Untuk Button5 (D):

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

        If Button5.Text = " " Then

        Else

            MsgBox("Jawaban Anda salah", , "KETERANGAN")

        End If

    End Sub

4. Untuk Form selanjutnya silahkan ikuti cara di atas tadi beserta Codingannya juga, tapi misalnya sobat ingin mengganti jawabannya boleh saja, tapi harus di ingat kembali. Jika Jawaban pada soal adalah B atau C atau D. Maka sobat juga perlu mengganti Codingannya tersebut sesuai pada Jawabannya. Bingung ? Hayooo perhatikan lagi Codingannya :D

5. Ini adalah tahap akhir, yaitu pengambilan Hadiah :D Silahkan Desain lagi untuk Tampilan Hadiahnya. Untuk kata kata pada Check Box boleh bebas terserah Sobat mau Hadiah seperti apa, karena ini hanyalah keisengan belaka. Dan untuk Button1 (SETUJU) klik 2x dan isi Codingannya seperti ini:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        If Button1.Text = " " Then

        Else

            MsgBox("MANTAP JIWAA !! HADIAHNYA MINTA KE PAK RT AJA YAK", , "KETERANGAN")

        End If

    End Sub

Selesai !!! :D Gimana sobat ? Cukup bingung juga kan ? Jelas bingung dong, ga gampang bikin beginian, harus ekstra sabar dan hati hati. Jika satu saja Codingannya salah, maka Program ini tidak akan bisa dijalankan sobat :D

Berikut ada sebuah Screenshot pada Aplikasi Quis tersebut:

1.

2.

3.

Baiklah sobat, mungkin cukup ini saja yang dapat Admin Posting pada hari ini :D Semoga bermanfaat untuk kita semua ya :D haha :v Ngantuk Adminnya juga nih :v wkwkwk

SELAMAT MENCOBA!!!