Tutorial Membuat Media Berhitung untuk Anak dengan VBA pada Powerpoint

Apa kabar sahabat ?, pada kesempatan ini kita akan belajar kembali mengenai pemrograman pada powerpoint menggunakan visual basic for aplication (VBA). Kali ini kita akan membuat program yang sangat sederhana, yaitu media berhitung untuk anak yang memuat penjumlahan dan pengurangan seperti ditunjukkan pada gambar di bawah ini :

 Untuk membuatnya ikuti langah-langkah di bawah ini :

• Bukalah Program Microsoft Office Powerpoint kemudian pilih layout blank
• Klik menu developer dan insert delapan buah Text Box, dan tiga buah Command Button, lalu atur properties masing-masing :

Kontrol	Name	Caption
TextBox1	a
TextBox2	b
TextBox3	c
TextBox4	keterangan
TextBox5	d
TextBox6	e
TextBox7	f
TextBox8	keterangan2
CommandButton1	cek	CEK
CommandButton2	cek2	CEK
CommandButton3	Reset	RESET

•  Pasang kode VBA di masing-masing CommandButton dengan cara klik dua kali pada masing-masing tombol dan ketikkan kode VBA sebagai berikut :

Nama Kontrol	Caption	Kode VBA
CommandButton1	CEK	Private Sub Cek_Click() Call Rumus End Sub
CommandButton2	CEK	Private Sub Cek2_Click() Call Rumus2 End Sub
CommandButton3	RESET	Private Sub Reset_Click() a = "" b = "" c = "" d = "" e = "" f = "" keterangan = "" keterangan2 = "" End Sub

• Pasang juga kode VBA di bagian General sebagai berikut :

Sub Rumus()

If c = Val(a) + Val(b) Then keterangan = "benar"

If c <> Val(a) + Val(b) Then keterangan = "salah"

End Sub

 

Sub Rumus2()

If f = Val(d) - Val(e) Then keterangan2 = "benar"

If f <> Val(d) - Val(e) Then keterangan2 = "salah"

End Sub

• Atur tampilan agar lebih menarik dengan menambahkan background, shape, maupun picture yang kita inginkan.
• Simpan file dalam format pptm
• Jalankan program yang telah anda buat.

Mudah bukan. Salam Sang Pengajar !