X-Code Cyber Team: Pemrograman

Menggunakan Event dan Method

Bismillah Hirrahman Nirrahim
Assalamu'alaikum Wr. Wb

Kali ini saya akan membahas postingan tentang "Menggunakan Event dan Method". Langsung saja kita bahas :

- Aktifkan VB 6 melalui tombol start.
- Buka kembali project Latihan.vbp yang pada potingan sebelumnya :

1. Klik tab Existing
2. Pilih folder masing-masing pada bagian Look in.
3. Pilih file Latihan vbp.
4. Klik tombol Open.

Tambahkan Form baru ke dalam Project

1. Klik menu Project > Add Form
2. Klik tab New dan pilih Form
3. Klik tombol Open

Pada Jendela Form buatlah UI seperti ini :
(Gunakan komponen ListBox, ComboBox, dan CommandButton)

Pengaturan property setiap object-nya adalah sebagai berikut :

Menulis Kode Program : Method Text
- Pada bagian Code Editor ketikkan programnya sebagai berikut :

Private Sub Form_Load()
   Combo1.AddItem "Umar"
   Combo1.AddItem "Salman"
   Combo1.AddItem "Halimah"
   Combo1.AddItem "Shafira"
End Sub

Private Sub Command1_Click()
   List1.AddItem Combo1.Text
End Sub

Private Sub Command2_Click()
   List1.RemoveItem List1.ListIndex
End Sub

Private Sub Command3_Click()
        List1.Clear
End Sub

- Simpan Form2 (nama file : Lat2.frm).
- Klik menu Project > Project1 Properties lalu klik tab General. Gantilah Startup Object-nya menjadi Form2 :

Keterangan : Startup Object menentukan object mana yang muncul setiap kali sebuah project dijalankan.

- Coba jalankan Project1 :

Untuk menambah isi ListBox : pilih "Umar" di dalam ComboBox kemudian klik tombol Add. Ulangi untuk nama-nama yang lain secara acak.
Untuk menghapus salah satu isi ListBox : pilih "Shafira" di dalam LixtBox kemudian klik tombol Delete.
Untuk menghapus semua isi ListBox : klik tombol Clear.

Penjelasan kode program :

Private Sub Form_Load()
   Combo1.AddItem "Umar"
   Combo1.AddItem "Salman"
   Combo1.AddItem "Halimah"
   Combo1.AddItem "Shafira"
End Sub

Pada saat Form2 di-load ke dalam memori komputer, object Combo1 diisi dengan beberapa nama.

Private Sub Command1_Click()
   List.AddItem Combo1.Text
End Sub

Ketika seorang user meng-klik tombol Add (object Command1) maka isi object ditambah sesuai dengan isi object Combo1 yang sudah dipilih.

Private Sub Command2_Click()
   List1.RemoveItem List1.ListIndex
End Sub

Ketika seorang user meng-klik tombol Delete (object Command2) maka isi object List1 yang dipilih akan dihapus. Catatan : bila belum ada isi yang dipilih akan terjadi error.

Private Sub Command3_Click()
   List.Clear
End Sub

Ketika seorang user meng-klik tombol Clear (object Command3) maka semua isi object List1 akan dihapus.

Cara penulisan (syntax) kode program untuk menggunakan method dari sebuah object adalah berikut :

nama_object.method [argument]

Perhatikan setelah Anda mengetikkan tanda titik (dot) dibelakang nama_object maka VB 6 akan
menampilkan daftar property dan method yang dimiliki oleh nama_object :

Fasilitas ini akan membantu Anda agar tidak salah mengetikkan nama_object maupun method-nya. Komponen ComboBox dan ListBox memiliki beberapa method untuk mengatur isi (item) di dalamnya,
yaitu :

AddItem – method ini akan menambah isi sesuai dengan argument yang diberikan berupa tulisan.
Setiap kali ada isi yang ditambahkan akan diberikan nomer index secara otomatis dimulai dari 0
(nol).
Contoh :
Combo1.AddItem “Umar” -> “Umar” adalah argument sebagai isi yang akan ditambahkan
ke dalam object Combo1.
List1.AddItem Combo1.Text -> property Text dari object Combo1 adalah argument
sebagai isi yang akan ditambahkan ke dalam object List1.
RemoveItem – method ini akan menghapus isi sesuai dengan argument yang diberikan berupa
nomer index dari isi yang dipilih. Setiap kali ada isi yang dihapus maka nomer index akan disusun ulang secara otomatis. Bila isinya tidak ada (kosong) nomer index-nya adalah –1.
Contoh :
List1.RemoveItem List1.ListIndex -> property ListIndex dari object List1 adalah argument
sebagai nomer index isi yang akan dihapus.
Clear – method ini akan menghapus semua isi (tidak membutuhkan argument).
Contoh :
List1.Clear -> semua isi object List1 akan dihapus.

Saya kira cukup, selamat membaca dan semoga bermanfaat.
Wassalamu'alaikum Wr. Wb

Postingan jelek, biarin yang penting saya puas.. :v :v

Add Comment

./X-Napoleon Pemrograman, Visual Basic

Menggunakan Event dan Property lewat Visual Basic

Bismillah Hirrahman Nirrahim
Assalamu'alaikum Wr. Wb

Halo semua.. :D, sebelumnya saya telah memposting tentang cara membuat kalkulator lewat VB, sekarang saya akan membahas tentang cara menggunakan Event dan Property lewat Visual Basic. Okay langsung saja..

Pertama, Klik komponen Label di dalam ToolBox kemudian "gambar" object Label1 di dalam Form dengan cara drag-drop. Lakukan langkah yang sama untuk object Label2. Object Text1 di-"gambar" menggunakan komponen TextBox, sedangkan object Command1 dan Command2 menggunakan komponen Command Button. Sehingga UI-nya menjadi seperti ini :
Kedua, Pilih object Command1 pada bagian Object Selector. Secara otomatis pada bagian Code Editor akan muncul blok kode program berikut :

Privat Sub Command1_Click()

End Sub

Event Click merupakan event default (standar) dari object Command1. Anda bisa melihat event lainnya pada bagian Event Selector. PAda bagian Code Editor ketikkan kode programnya sebagai berikut :

Private Sub Command1_Click()
Label2.Caption = Text.Text
End Sub

Private Sub Command2_Click()
End
End Sub

Ketiga, Simpan Project1 (nama file : Latihan.vbp) dan Form1 (nama file : Lat1.frm). VB 6 akan menyimpan program yang Anda buat ke dalam beberapa file yang saling terkait, antara lain : file project (*.vbp), file form (*.frm) dan file module (*.bas).

Coba jalankan Project1 dengan mengklik tombol Start pada bagian Toolbar atau tekan tombol F5 pada keyboard. Ketikkan "Salmad" di dalam TextBox kemudian klik tombol OK. Maka akan tampil hasil sebagai berikut :

Bila ingin keluar klik tombol Selesai

Penjelasan kode program :
Berikut diberikan penjelasan bagaimana cara kerja program sederhana di atas

Private Sub Command1_Click()
   Label2.Caption = Text1.Text
End Sub

Ketika seorang user meng-klik tombol OK (object Command1) maka isi tulisan pada object Label2 akan sama dengan isi tulisan pada object Text1. Property Caption pada obyek Label2 digunakan untuk menampilkan text tertentu di obyek tersebut.

Selanjutnya untuk keluar dari program dituliskan kode berikut :

Private Sub Command2_Click()
   End
End Sub

Ketika seorang user meng-klik tombol Selesai (object Command2) maka program akan berhenti. Perintah End digunakan untuk menutup program.

Menampilkan tulisan merupakan salah satu property sebuah object adalah sebagai berikut :

nama_object.property = value

Perhatikan, setelah Anda mengetikkan tanda titik (dot) dibelakang nama_object maka VB 6 akan menampilkan daftar property dan method yang dimiliki oleh nama_object :

Fasilitas ini disebut Intellisense, dan sangat membantu Anda agar tidak salah mengetikkan nama_object

Modifikasi Kode Program
Ubah tampilan UI-nya menjadi seperti ini :
(Tambahkan komponen Frame, OptionButton dan CheckBox)

Atur property object-object tambahannya sebagai berikut :

Object : Properties = Value
Frame1 : Caption = Pilihan :
Option1 : Caption = Biru
Option2 : Caption = Merah
Check1 : Caption = Tebal
Check2 : Caption = Miring

Obyek Frame1 harus dibuat terlebih dahulu si form, dan selanjutnya obyek Option dan Check dibuat di dalam Frame1 tersebut. Tujuan pembuatan berbagai pilihan tersebut adalah memperkenalkan pada Anda fasilitas Option dan CheckBox yang digunakan untuk membuat pilihan dalam aplikasi.

Tambahkan kode programnya sebagai berikut :

Private Sub Option_Click()
Label2.ForeColor = vbBlue
End Sub

Private Sub Option2_Click()
Label2.ForeColor = vbRed
End Sub

Private Sub Check1_Click()
Label2.FontBold = Check.Value
End Sub

Private Sub Check2_Click()
Label2.FontItalic = Check2.Calue
End Sub

Simpan kembali Form1, kemudian coba jalankan Project1 dan lihat hasilnya

Okey, saya rasa cukup pembahasan dari saya
Wassalamu'alaikum Wr. Wb.

Postingan jelek, biarin yang penting saya puas.... :v :v

Add Comment

./X-Napoleon Pemrograman, Visual Basic