Power Point Visual Basic

Membuat Soal Latihan dan evaluasi dengan Visual basic, bisa untuk menampilkan skor. Langkah-langkahnya sebagai berikut :

Klik Office Button -> Power Point Option -> Popular-> Show Developer Tab In The Ribbon

Memasukkan Action Script Visual Basic
Klik Developer -> View Code-> Insert ->  Module

Masukkan Script Visual Basic

Public jumlahbenar As Integer

Sub pengenalan()

jumlahbenar = 0

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub benar()

jumlahbenar = jumlahbenar + 20

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub salah()

ActivePresentation.SlideShowWindow.View.Next

End Sub

Sub hasil()

MsgBox ("Nilai Kamu Adalah " & jumlahbenar)

End Sub

Sub latihansalah()

MsgBox ("Jawaban kamu belum benar, cobalah kembali")

End Sub

Sub latihanbenar()

MsgBox ("Jawaban kamu benar, lanjutkan soal berikutnya")

ActivePresentation.SlideShowWindow.View.Next

End Sub

Hasilnya Sebagai berikut ;

Klik Save / Gambar Disket  --> CLOSE

Memberikan Action Pada Tombol / Button

Klik Pada Tombol Pilihan a   - Insert - Action - Run Macros - Pilih Salah/benar/Pengenalan/Hasil/Latihan benar/Latihan salah - OK

Catatan :

Pilih Salah jika Jawaban Pilihan jawaban itu Salah

Pilih Benar jika Jawaban Pilihan jawaban itu Benar

Pilih  Pengenalan, Untuk memulai Test(Start)

Pilih Hasil, Untuk Melihat Hasil Test

Pilih Latihan Salah jika ingin user boleh memilih lebih dari satu jawaban, tanpa skor

Pilih Latihan Benar jika ingin user boleh memilih lebih dari satu jawaban, tanpa skor