Pages

0

Quiz PowerPoint Sangat Mudah!

Salah satu ciri utama sebuah media pembelajaran adalah terdapatnya soal interaktif (quiz) di dalamnya. Berikut ini beberapa langkah yang dapat dilakukan untuk membuat quiz interaktif.
Langkah 1.  Pilihlah slide quiz.
Langkah 2.  Pada slide quiz, buatlah petunjuk pengerjaan quiz dan sebuat tombol untuk memulai quiz. Berikut tampilan slide petunjuk quiz.
Langkah 3.  Sisipkan slide setelah slide petunjuk quiz sebanyak jumlah soal yang akan ditampilkan. Isikan slide tersebut dengan soal, opsi jawaban, dan pilihan jawaban. Berikut ini salah satu contoh tampilan slide soal.
Langkah 4.  Tambahkan satu slide untuk menampilkan skor yang diperoleh.
Langkah 5.Buka makro dengan cara klik menu View -> macros.
Langkah 6.  Pada dialog box macros, isikan macro name dengan “mulaiEvaluasi” lalu pilih create.
Langkah 7.  Pada Microsoft VB, ketikkan script berikut.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

19

20
21
Public nilai As Integer

Sub mulaiEvaluasi()
nilai = 0
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub opsiBenar()
nilai = nilai + 20
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub opsiSalah()
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub OnSlideShowPageChange(ByVal Window As SlideShowWindow)
If Window.View.CurrentShowPosition = Window.Presentation.Slides(12).SlideIndex Then
ActivePresentation.Slides(12).Shapes("TextBox 13").TextFrame.TextRange.Text = "Skor Anda adalah " & nilai
End If
End Sub
Langkah 8.  Lakukan pengaturan pada script sebagai berikut.
a.        Baris 9
9
nilai = nilai + 20
Angka 20 merupakan nilai setiap soal
b.        Baris 18 dan 19
18

19
If Window.View.CurrentShowPosition = Window.Presentation.Slides(12).SlideIndex Then
ActivePresentation.Slides(12).Shapes("TextBox 13").TextFrame.TextRange.Text = "Skor Anda adalah " & nilai
Angka 12 diisi dengan nomor slide yang terakhir quiz(slide yang berisi hasil quiz).
c.        Baris 19
19
ActivePresentation.Slides(12).Shapes("TextBox 13").TextFrame.TextRange.Text = "Skor Anda adalah " & nilai
Kode “Subtitle 13”merupakan nama text boxt pada slide terakhir quiz (slide yang berisi hasil quiz). Langkah untuk mengetahui nama textbox sebagai berikut:
                             i.          Kembali ke template powerpoint.
                           ii.          Pilih slide hasil evaluasi.
                         iii.          Klik text box yang akan digunakan untuk menampilkan skor.
                          iv.          Klik menu Format
                            v.          Pilih Selection Pane
                          vi.     Lihatlah nama yang aktif pada panel selection pane. Gunakan nama tersebut untuk mengganti baris 19.
Langkah 9.Tambahkan action berikut ini.
a.        Slide petunjuk quiz, tombol mulai:
b.        Slide Soal, tombol opsi (misal kunci jawaban a):
(untuk pilihan jawaban yang benar)
(untuk pilihan jawaban yang salah)
c.        Dengan cara yang sama, berikan Action pada tombol ulang (slide hasil quiz) untuk kembali ke slide petunjuk quiz.
Langkah 10.Tampilkan Slide Show untuk melihat hasilnya.

Desa Banjarejo

Phasellus facilisis convallis metus, ut imperdiet augue auctor nec. Duis at velit id augue lobortis porta. Sed varius, enim accumsan aliquam tincidunt, tortor urna vulputate quam, eget finibus urna est in augue.

Tidak ada komentar:

Posting Komentar

Berikut