MEMBUAT PROGRAM APLIKASI DAFTAR
KARYAWAN
A. Metode List Box
Dalam membuat aplikasi
untuk pembuatan daftar karyawan anda dapat menggunakan metode List Box . Pada aplikasi ini anda dapat menambah atau mengurangi item pada List Box pada
saat aplikasi program berjalan.
Langkah-langkah pembuatan program aplikasi ini
adalah:
- Merancang interface yang akan dibuat
Untuk
membuat interface aplikasi ini dibutuh objek dari Tool Box sebagai berikut: 1
buah List Box, 4 Label, 3 Text, 5 Command Button dibuat seperti pada gambar 1.
- Merubah Objek nilai tampilan
Untuk
merubah tampilan dari objek program aplikasi dapat dilihat pada tabel 1.
Tabel 1.
Propertie yang dirubah pada Windows Properties
Objek
|
Properti
|
Nilai
|
Form1
|
Caption
|
Metode List Box
|
Label1
|
Caption
Font
|
Karyawan Bengkel
20
|
Label2
|
Caption
|
Tambah :
|
Label3
|
Caption
|
Kurang :
|
Label4
|
Caption
|
Jumlah Karyawan :
|
Text1
|
Text
|
(kosongkan)
|
Text2
|
Text
|
(kosongkan)
|
Text3
|
Text
|
(kosongkan)
|
Command1
|
Caption
|
&Add
|
Command2
|
Caption
|
&Remove
|
Command3
|
Caption
|
&Count
|
Command4
|
Caption
|
Remove &All
|
Command5
|
Caption
|
E&xit
|
- Pembuatan
Kode Program Aplikasi
Langkah-langkah
yang harus dilakukan untuk pembuatan kode program adalah:
·
Klik ganda jendela Metode List Box, lalu ketikkan kode program dibawah ini
Private Sub
Form_Load()
List1.AddItem
"Amir"
End Sub
·
Klik ganda tombol Add, lalu ketikkan kode program dibawah ini
Private Sub Command1_Click()
List1.AddItem Text1.Text
End Sub
·
Klik ganda tombol Remove, lalu ketikkan kode program dibawah ini
Private Sub Command2_Click()
List1.RemoveItem (Text2.Text)
End Sub
·
Klik ganda tombol Count, lalu ketikkan kode program dibawah ini
Private Sub Command3_Click()
Text3.Text = List1.ListCount
End Sub
·
Klik ganda tombol Remove All, lalu ketikkan kode program dibawah ini
Private Sub Command4_Click()
List1.Clear
End Sub
·
Klik ganda tombol Exit, lalu ketikkan kode program dibawah ini
Private Sub Command5_Click()
End
End Sub
·
Program siap dijalankan dengan menekan tombol F5 atau Menu Utama dengan mengklik RUN. Apabila ditekan Add maka data bertambah, ditekan Remove akan berkurang, Count ditekan akan dijumlah, Remove All data dalam list akan dihapus
semuanya
B.
Mengunakan
Combo Box
Untuk
membuat aplikasi program dengan Combo box ini ada beberapa pilihan yang dapat
yaitu; Drop down, Simple dan Drop-Down List. Untuk menentukan jenis
dari combo box ini dapat dilakukan pada property style.
1. Drop-Down:
kotak combo ini hanya akan ditampilkan stau baris saja. Kotak ini akan terbuka jika user mengklik
tombol panah bawah. User juga dapat memasukkan atau mengetikkan nilai bagian
atas kotak combo ini.
2. Simple: kotak combo ini mirip
dengan daftar pada list box, tetapi disini user bias mengetikkan nilai di
bagian atas kotak combo ini.
3.
Drop Down List: Kotak combo ini hanya akan ditampilkan
stau baris saja. Kotak ini terbuka bila user mengklik tombol panah bawah. User
tidak dapat menambah atau mengetikkan nilai seperti pada Drop-Down Combo.
Latihan penggunaan Combo Box:
Pada latihan ini
tampilan dari aplikasi program adalah seperti dibawah ini:
- Rancangan Tampilan.
Objek
yang digunakan adalah: 3 buah Label, 3 buah Combo, 6 buah Text, dan 2 Command
Button.
- Merubah Objek nilai tampilan
Untuk
merubah tampilan dari objek program aplikasi dapat dilihat pada tabel 2.
Tabel 2.
Propertie yang dirubah pada Windows Properties Untuk ComboBox
Objek
|
Properti
|
Nilai
|
Form1
|
Caption
|
Macam-Macam Combo Box
|
Label1
|
Caption
|
Drop Down Combo
|
Label2
|
Caption
|
Simple Combo
|
Label3
|
Caption
|
Drop Down List
|
Text1
|
Text
Multi Line
|
User dapat menambah atau
mengurangi data baru
True
|
Text2
|
Text
Multi Line
|
User dapat menambah atau
mengurangi data baru
True
|
Text3
|
Text
Multi Line
|
User dapat menambah atau
mengurangi data baru
True
|
Text4
|
Text
|
(kosongkan)
|
Text5
|
Text
|
(kosongkan)
|
Text6
|
Text
|
(kosongkan)
|
Command1
|
Caption
|
K&eluar
|
Command2
|
Caption
|
O&k
|
Combo1
|
Style
|
0-Drop Down Combo
|
Combo2
|
Style
|
1-Simple Combo
|
Combo3
|
Style
|
2-Drop Down List
|
- Pembuatan Kode Pemrograman
Langkah-langkahnya adalah sebagai berikut:
·
Klik ganda pada Form kemudian ketik kode-kode
dibawah ini:
Private Sub
Form_Load()
'untuk data
combo1
Combo1.AddItem "Anton"
Combo1.AddItem "Amin"
Combo1.AddItem "Ahmad"
Combo1.AddItem "Adi"
Combo1.AddItem "Abdul"
Combo1.AddItem "Abdilla"
'Untuk data combo2
Combo2.AddItem "Anton"
Combo2.AddItem "Amin"
Combo2.AddItem "Ahmad"
Combo2.AddItem "Adi"
Combo2.AddItem "Abdul"
Combo2.AddItem "Abdilla"
'Untuk data combo3
Combo3.AddItem
"Anton"
Combo3.AddItem
"Amin"
Combo3.AddItem
"Ahmad"
Combo3.AddItem
"Adi"
Combo3.AddItem
"Abdul"
Combo3.AddItem
"Abdilla"
End Sub
·
Klik Ganda pada Command1, kemudian ketik kode
dibawah ini:
Private Sub
Command1_Click()
End
End Sub
·
Klik Ganda pada Command2, kemudian ketik kode
dibawah ini:
Private Sub
Command2_Click()
Text4.Text =
Combo1.Text
Text5.Text =
Combo2.Text
Text6.Text =
Combo3.Text
End Sub
No comments:
Post a Comment