Tipe Data dalam Aplikasi Visual Basic (VBA) pada Powerpoint
Istilah integer,
string, Boolean, variant, merupakan tipe data dalam pemrograman digunakan untuk
mendeklarasikan sebuah variabel dengan
menyebutkan tipe datanya. Misalnya :
Dim Nilai As
Integer
Bermakna
variabel nilai kita deklarasikan dalam tipe data integer. Tipe data dalam
Aplikasi Visual Basic (VBA) pada Powerpoint
Tipe Data
|
Keterangan
|
Integer
|
Data numerik
dengan jangkauan input antara -32768 sampai dengan 32767
|
String
|
Data berupa
teks
|
Long
|
Data numerik
dengan jangkauan input antara -2147483648 sampai dengan 2147483647
|
Single
|
Data numerik
dengan jangkauan input antara -3.402823E38 sampai dengan -1.401298E-45 jika
negatif, dan antara 1.401298E-45 sampai dengan 3.402823E38 jika positif.
|
Double
|
Data numerik
dengan jangkauan input antara -1.79769313486232E308 sampai dengan
-4.94065645841247E-324 jika negatif, dan antara 4.94065645841247E-324 sampai
dengan 1.79769313486232E308 jika positif.
|
Currency
|
Data berupa
nilai uang
|
Byte
|
Data berupa bilangan
bulat antara 0 sampai dengan 255
|
Boolean
|
Data yang
hanya memiliki nilai benar (True) dan salah (False)
|
Object
|
Data mengacu
pada object yang digunakan
|
Date
|
Data berupa
tanggal
|
Variant
|
Data inout
sembarang angka dengan jangkauan tipe double dan teks yang jangkauannya sama
dengan string
|
Sebuah variabel
sebelum digunakan dideklarasikan dahulu dalam jendela code. Mendeklarasikan variabel
bertujuan untuk mengenalkan variabel tersebut pada program dibuat.
Pendeklarasian variabel biasanya diletakkan di bagian paling atas (bagian General)
atau bisa juga di bagian Prosedur.
Untuk mendeklarasikan sebuah variabel
digunakan pernyataan Dim diikuti nama variabel beserta tipe
data sebagai berikut :
Dim<Nama_Variabel>As<Tipe_Data>
Mendeklarasikan sebuah variabel
dengan pernyataan Dim pada sebuah prosedur maka hanya akan berlaku selama
prosedur tersebut. Artiya, setelah prosedur tersebut selesai dijalankan maka
data pada variabel akan terhapus dengan sendirinya.
Selain menggunakan Dimdimungkikan
bisa mendeklarasikan sebuah variabel menggunakan pernyataan-pernyataan berikut
ini :
- Public,
penggunaannya berlaku pada semua bagia program aplikasi yang dibuat
- Static,
penggunaannya berlaku hanya pada level prosedur saja
- Private,
penggunaannya berlaku hanya pada level modul atau form saja
Program yang akan
kita buat adalah kalkulator sederhana, hanya akan menggunakan operasi dasar
matematika yaitu penjumlahan (+), pengurangan (-), perkalian (x), pembagian
(/), dan pemangkatan (^). Kelima operasi dasar tersebut akan difungsikan
melalui lima buah tombol operasi dan dilengkapi dengan satu buah tombol untuk
menghapus data input dan data output.
Langkah-langkah
pembuatannya adalah sebagai berikut :
Pertama, Jalankan program
Microsoft Office Powerpoint, pastikan menu developer sudah muncul di deretan
menu utama
Kedua, ubah layout slide 1
menjadi blank
Ketiga, Pasang tiga buah TextBox dan enam buah Command
Button
di slide 1 dan ubah properties masing-masing kontrol seperti ditunjukkan pada
gambar di bawah ini :
Properties
masing-masing kontrol adalah sebagai berikut :
Kontrol
|
Name
|
Caption
|
TextBox1
|
a
|
|
TextBox2
|
b
|
|
TextBox3
|
Hasil
|
|
CommandButton1
|
plus
|
+
|
CommandButton2
|
minus
|
-
|
CommandButton3
|
pangkat
|
^
|
CommandButton4
|
kali
|
x
|
CommandButton5
|
bagi
|
/
|
CommandButton6
|
Hapus
|
(sahabat juga bisa
mengatur jenis dan ukuran font tiap kontrol)
Keempat, 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
|
plus
|
+
|
Private Sub plus_Click()
Hasil
= Val(a) + Val(b)
End Sub
|
minus
|
-
|
Private Sub minus_Click()
Hasil
= a - b
End Sub
|
pangkat
|
^
|
Private Sub pangkat_Click()
Hasil
= a ^ b
End Sub
|
kali
|
x
|
Private Sub kali_Click()
Hasil
= a * b
End Sub
|
bagi
|
/
|
Private Sub bagi_Click()
Hasil
= a / b
End Sub
|
Hapus
|
Private Sub Hapus_Click()
a
= ""
b
= ""
Hasil
= ""
End Sub
|
Kelima, sisipkan background
dan berbagai shape untuk mempercantik desain. Jalankan Powerpoint dengan klik
Slide Show (atau F5).
Program Kalkulator
sederhana menggunakan 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 :
- Simpan file dalam format pptm
- Jalankan program
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
0 komentar:
Posting Komentar
Tinggalkan komentar anda disini :