Friday, 4 November 2016

Membuat Soal Pilihan Ganda Interaktif

Tahap Terakhir dari setiap materi yang disampaikan perlu dilakukan evaluasi, biar lebih interaktif evaluasi akhir pembelajaran bisa kita buat pada media pembelajaran. Berikut adalah langkah-langkah untuk membuat Soal Pilihan Ganda yang interaktif pada MS Power Point.
    • Buat satu slide baru/new slide pada MS Power Point
    • Pada Slide Pertama sertakan petunjuk atau cara mengerjakan soal, jumlah soal, waktu dan hal penting lainnya dan buat satu tombo mulai 
    • Pada slide ke 2 dan seterusnya biat soal dan pilihan ganda (A, B, C, D) dan setiap soal tentukan satu pilihan yang benar (Buat satu slide satu soal)
    • Pada slide terakhir atau penutup siapkan satu tombol Selesai & Cek Hasil 
    • Setelah soal selesai tekan tombol Alt + F11
    • Pada layar akan tampil jendela makro dan copy skrip berikut : 
        Dim nilai As Integer
        Dim konfirmasi As String
        Sub mulai_kuis()
        nilai = 0
        ActivePresentation.SlideShowWindow.View.Next
        End Sub
        Sub benar()
        konfirmasi = MsgBox("Yakin dengan jawaban anda?", vbYesNo, " Cek Jawaban!")
        If konfirmasi = vbYes Then
        nilai = nilai + 10
        ActivePresentation.SlideShowWindow.View.Next
        End If
        End Sub
        Sub salah()
        konfirmasi = MsgBox("Yakin dengan jawaban anda?", vbYesNo, " Cek Jawaban!")
        If konfirmasi = vbYes Then
        ActivePresentation.SlideShowWindow.View.Next
        End If
        End Sub
        Sub cek_skor()
        MsgBox (" skor anda adalah " & nilai)
        konfirmasi = MsgBox(" Ingin Mengulangi kuis? ", vbYesNo)
        If konfirmasi = vbYes Then
        ActivePresentation.SlideShowWindow.View.First
        End If
        If konfirmasi = vbNo Then
        ActivePresentation.SlideShowWindow.View.Next
        End If
        End Sub
        •  Jika sudah tutup jendela macro, kemudian
        •  Pada slide pertama : klik tombol "mulai" kemudian pilih insert > Action, klik Run Macro > mulai_kuis
        • Pada slide ke 2 hingga 11 : setiap tombol jawaban (teks juga bisa), berilah action dengan cara : Pilih tombol > Klik Menu Start > Klik Icon Action > Run Macro > Pilih "Benar" untuk jawaban benar dan "salah" untuk jawaban salah.
        • Pada slide penutup : pilih tombol "Selesai & Cek Hasil" lalu klik > Action > Run Macro > cek_skor. Selengkapnya seperti gambar berikut.
        • Terkahir simpan file anda. Untuk Power Point (2007 dan 2010) simpan dengan format PPTM (PowePoint Macro - Enabel Presentation)
        Akhirnya selsesai juga buat media pembelajaran dengan menggunakan aplikasi Power Pont.
        Selanjutnya untuk melihat semua tampilan presentasi tekan tombol F5 pada keybord.

        Selamat mencoba dan silakan sekarang di presentasikan ke siswa

        sumber : semua ini saya dapatkan dari pengalaman saat diklat

        No comments:

        Post a Comment