Diberdayakan oleh Blogger.

Kamis, 02 Mei 2013

Power Point Interaktif dengan Visual Basic

Om Swastyastu,

Microsoft Power Point merupakan salah satu dari paket Microsoft Office. Microsoft Power Point biasanya digunakan sebagai media presentasi ataupun membuat media pembelajaran. Dalam pembuatan media pembelajaran ataupun presentasi haruslah menarik dan interaktif agar tidak membuat jemu. Yang menjadi pertanyaan, bisakah anda membuatnya menjadi lebih menarik dan interaktif?  Agar  media pembelajaran menjadi lebih interaktif maka anda dapat memadukan antara visual basic dengan Power Point. 
Dengan memadukan antara Visual Basic dengan Power Point anda dapat membuat pertanyaan interaktif dimana anda ataupun pengguna nantinya dapat memilih pertanyaan lewat power point kemudian hasilnya langsung ditabulasi. Berikut langkah-langkah memadukannya, selamat membaca.

  1. Buka lembar kerja microsoft power point anda. Buatlah beberapa slide. slide pertama digunakan sebagai pembuka dan slide berikutnya dapat digunakan sebagai soal dan hasil evaluasi.
  2. buka jendela visual basic di microsoft power point caranya klik Develover---> Visual Basic
  3. Kemudian copaskan scrip di bawah ini, tempelkan pada lembar Visual Basic. (catatan: untuk mengurangi kekeliruan anda dapat mendownload pada link ini, tinggal buka file nya kemudian copy dan tempelkan)
  4. Dim nilai As Integer
    Dim konfirmasi As String
    
    Sub mulai()
    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 + 1
    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 jawab()
    'tombol untuk selesai
    MsgBox (" skor anda adalah " & nilai)
    End Sub

  5. Kemudian simpan (ctrl+S)
Masuk pada slide pertama, klik Insert---> Action maka muncullah jendela seperti gambar di bawah ini. Klik Run macro
Keterangan :
  • Mulai, hanya digunakan sekali di awal slide, fungsinya untuk memulai mengerjakan soal
  • Benar, setiap nomor / setiap slide hanya berisi 1 tombol bernilai benar, fungsinya untuk menandai jawaban benar
  • Salah, setiap nomor / setiap slide berisi lebih dari 1 tombol bernilai salah, fungsinya untuk menandai jawaban salah
  • Selesai, hanya digunakan sekali di akhir slide, fungsinya untuk mengetahui perolehan nilai.
Agar lebih memahami anda dapat menyimak lewat video berikut ini

(Video Tutorial 1)


(Video Tutorial 2)

silakan klik link link ini (DOWNLOAD) untuk melihat contohnya...
Categories:

0 komentar:

Posting Komentar