Membuat soal quiz / kuis pilihan ganda di power point (ppt) muncul Nilai / SKOR nya 

Untuk Script nya teman teman bisa copy paste text di bawah ini:
-------------------------------------------------------------------------------------------------------
Public Nilai As Integer
Sub Benar()
Nilai = Nilai + 10
ActivePresentation.SlideShowWindow.View.Next
End Sub
Sub Salah()
ActivePresentation.SlideShowWindow.View.Next
End Sub
Sub Skor()
MsgBox (" Nilai anda adalah " & Nilai)
Nilai = 0
End Sub
-------------------------------------------------------------------------------------------
Selamat mencoba , jangan lupa subscribe
-------------------------------------------------------------------------------------------