Home, Forum diskusi, Chatting, Download


Kontrol Standard (bagian 1)

Kontrol standard terdapat pada semua versi Visual Basic, baik pada Learning Edition, Profesional Edition, maupun Enterprised Edition.

Kontrol-kontrol standard ini akan sering anda gunakan untuk pembentukkan user interface pada setiap project yang anda buat. Pada bagian ini kita akan membahas beberapa kontrol standard beserta properti-properti, event-event dan metoda-metoda yang bekerja pada masing-masing kontrol. Dengan memahami properti, event dan metoda akan sangat membantu anda dalam memanfaatkan kontrol-kontrol tersebut secara efektif dan efisien.

Pada Modul ini kita akan membahas Label, Textbox, Option, Check, Frame dan Command.

Label

Digunakan untuk menampilkan text tanpa bisa diubah oleh pemakai pada saat runtime.
Beberapa properti pada label :

Properti Fungsi
Alignment Digunakan untuk menentukan pemerataan tulisan pada kontrol label (0 - Left Justify, 1 - Right Justify, 2 - Center)

Appearance Digunakan untuk menentukan tampilan dari kontrol label di cat atau tidak (0 - Flat, 1 - 3D)
AutoSize Digunakan untuk menentukan apakah ukuran kontrol otomatis disesuaikan dengan ukuran tulisan (False, True)
BackColor Digunakan untuk menentukan warna latar belakang (properti ini saling berkaitan dengan properti Appearance)
BackStyle Digunakan untuk menentukan prilaku latar belakang kontrol label (0 - Transparent, 1 - Opaque), kalau transparan, maka BackColor menjadi tidak berarti, demikian juga Appearance.

BorderStyle Digunakan untuk menentukan bentuk border, apakah (0- None, 1 - Fixed Single)

Caption Digunakan untuk menentukan tulisan pada kontrol label, mungkin ini adalah properti yang paling sering anda gunakan.
DragIcon Digunakan untuk menentukan icon yang digunakan pada operasi drag-n-drop pada kontrol label
DragMode Menentukan modus drag-n-drop (0 - manual, 1 - automatic)
Enabled Menentukan apakah kontrol label dapat menerima event yang dibuat oleh pemakai, misalnya event Click, MouseDown, MouseUp, dll.
Font Digunakan untuk menentukan jenis font, ukuran, style, dll
ForeColor Digunakan untuk menentukan warna tulisan
Height Digunakan untuk menentukan tinggi dari kontrol
Index Digunakan untuk menentukan nomor index, jika kontrol tersebut merupakan kontrol array.
Left Digunakan untuk menentukan jarak kiri kontrol dari kontainernya.
MouseIcon Digunakan untuk menentukan icon mouse yang digunakan ketika pointer mouse berada diatas kontrol label tersebut, properti ini berarti bila properti MousePointer diset menjadi (99 - Custom)
MousePointer Digunakan untuk menentukan bentuk pointer yang digunakan ketika mouse pointer berada diatas kontrol label tersebut.
Tag Properti ini dapat digunakan sebagai tempat menyimpan data sementara yang berkaitan dengan kontrol label tersebut
ToolTipText Digunakan untuk menentukan tip tulisan ketika mouse pointer berada diatas kontrol
Top Digunakan untuk menentukan jarak atas kontrol dari kontainernya.
UseMnenomic Digunakan untuk menentukan perlakuan terhadap tanda & ampersand sebagai access key, atau sebagai simbol & (False, True)
Visible Digunakan untuk menentukan apakah kontrol label tersebut Visible atau tidak (False, True)
Width Digunakan untuk menentukan lebar kontrol label
WordWrap Digunakan untuk menentukan apakah tulisan dalam kontrol label dapat dilipat menjadi beberapa baris.

Gambar 3-1, Contoh properti pada kontrol Label

Adapun event-event yang efektif pada kontrol label adalah :

Event Keterangan
Change Event ini terjadi ketika nilai properti Caption dari kontrol
Click Event ini terjadi ketika pemakai melakukan klik pada kontrol, event ini terjadi dengan urutan (MouseDown, MouseUp, Click)
DblClick Event ini terjadi ketika pemakai melakukan double klik pada kontrol, event ini terjadi dengan urutan (MouseDown, MouseUp, Click, MouseDown, DblClick, MouseUp)
MouseDown Event ini terjadi ketika pemakai melakukan penekanan tombol mouse pada kontrol, parameter yang dapat digunakan adalah Button (1 - Tombol kiri, 2 - Tombol kanan),  Shift (1 - Shift, 2 - Ctrl, 3 - Alt), X (posisi kolom pointer), Y (posisi baris pointer)
MouseMove Event ini terjadi ketika pamakai mengerakan mouse pada kontrol, parameter yang dapat digunakan adalah Button (1 - Tombol kiri, 2 - Tombol kanan),  Shift (1 - Shift, 2 - Ctrl, 3 - Alt), X (posisi kolom pointer), Y (posisi baris pointer)
MouseUp Event ini terjadi ketika pemakai melepaskan penekanan tombol mouse pada kontrol, parameter yang dapat digunakan adalah Button (1 - Tombol kiri, 2 - Tombol kanan),  Shift (1 - Shift, 2 - Ctrl, 3 - Alt), X (posisi kolom pointer), Y (posisi baris pointer)

Adapun metoda yang efektif pada kontrol label adalah :

Metoda Keterangan
Move Metoda ini digunakan untuk memindahkan letak (koordinat Left, Top) dari kontrol label maupun ukurannya (ukuran Height, Width)
Refresh Metoda ini digunakan untuk mencetak ulang kontrol label.
ZOrder Metoda ini digunakan untuk menentukan order kontrol, apakah diatas atau dibawah kontrol lain.

Textbox

Digunakan untuk menampilkan text yang dapat diubah oleh pemakai pada saat runtime

Properti Fungsi
Alignment sda
Appearance sda
BackColor sda
BorderStyle sda
CauseValidation Digunakan untuk menentukan apakan event Validate di aktifkan ketika kontrol akan kehilangan fokus (False, True)
DragIcon sda
DragMode sda
Enabled sda
Font sda
ForeColor sda
Height sda
HideSelection Digunakan untuk menentukan apakah selection disembunyikan ketika kontrol kehilangan fokus
Index sda
Left Digunakan untuk menentukan jarak kiri kontrol dari kontainernya.
Locked Digunakan untuk menentukan apakah text dalam kontrol textbox dapat di perbaharui oleh pemakai atau tidak (False, True)
MaxLength Digunakan untuk menentukan jumlah huruf maksimal yang dapat diketikkan dalam textbox (0 s/d 65535), 0 tidak dibatasi.
MouseIcon Digunakan untuk menentukan icon mouse yang digunakan ketika pointer mouse berada diatas kontrol label tersebut, properti ini berarti bila properti MousePointer diset menjadi (99 - Custom)
MousePointer Digunakan untuk menentukan bentuk pointer yang digunakan ketika mouse pointer berada diatas kontrol label tersebut.
MultiLine Digunakan untuk menentukan apakah tulisan dalam textbox dapat ditampilkan dalam bentuk beberapa baris, dan mengenali Enter untuk memasuki baris baru. (False, True)

PasswordChar Digunakan untuk menentukan karakter yang digunakan untuk menyandikan tampilan huruf yang diketik oleh pemakai. Biasanya digunakan untuk pengisian password, dimana huruf yang ditekan ditampilkan dalam bentuk *

ScrollBars Digunakan untuk menentukan penampilan ScrollBar pada textbox, properti ini efektif jika setting properti MultiLine adalah True (0 - None, 1 - Horizontal, 2 - Vertical, 3 - Both)

TabIndex Digunakan untuk menentukan urutan tabindex, 0 adalah kontrol yang pertama mendapat fokus jika form dijalankan. Properti ini efektif jika setting properti TabStop adalah True
TabStop Digunakan untuk menentukan apakah textbox dapat menerima fokus karena penekanan tombol TAB oleh pemakai (False, True)
Tag sda
Text Properti ini berisi tulisan yang berada dalam textbox 
ToolTipText sda
Top sda
Width sda

Gambar 3-2, Contoh properti pada kontrol Text

Adapun event-event yang efektif pada kontrol Textbox adalah :

Event Keterangan
Change Event ini terjadi ketika nilai properti Text dari kontrol mengalami perubahan
Click sda
DblClick sda
GotFocus Event ini terjadi ketika kontrol mendapatkan fokus
KeyDown Event ini terjadi ketika pemakai mengetik karakter pada kontrol
KeyPress Event ini terjadi setelah event KeyDown ketika pemakai mengetik karakter pada kontrol, parameter yang dapat digunakan adalah KeyAscii. Anda dapat memanipulasi tombol yang diketik dengan melakukan perubahan pada nilai KeyAscii.

Contoh :

Private Sub txtNama_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys "{Tab}"
End If
End Sub

KeyUp Event ini terjadi setelah event KeyPress ketika pemakai mengetik karakter pada kontrol dengan urutan (KeyDown, KeyPress, KeyUp, Change)
LostFocus Event ini terjadi ketika kontrol kehilangan fokus
MouseDown sda
MouseMove sda
MouseUp sda
Validate Event ini terjadi ketika kontrol akan kehilangan fokus.

Adapun metoda yang efektif pada kontrol Textbox adalah :

Metoda Keterangan
Move sda
Refresh sda
Setfocus Metoda ini digunakan untuk menimdahkan fokus ke kontrol yang bersangkutan
ZOrder sda

Option

Digunakan untuk menampilkan beberapa pilihan yang hanya dapat dipilih salah satu dalam suatu form, untuk 

Properti Fungsi
Alignment sda
Appearance sda
BackColor sda
Caption sda
CauseValidation sda
DisablePicture Digunakan untuk menentukan gambar yang ditampilkan ketika kontrol Option disable (properti Enabled = False), properti ini efektif jika setting properti Style adalah (1- Graphical)
DownPicture Digunakan untuk menentukan gambar yang ditampilkan ketika kontrol Option dipilih (properti Value = True), properti ini efektif jika setting properti Style adalah (1- Graphical)
DragIcon sda
DragMode sda
Enabled sda
Font sda
ForeColor sda
Height sda
Index sda
Left Digunakan untuk menentukan jarak kiri kontrol dari kontainernya.
MaskColor Digunakan untuk warna pada bitmap yang akan dijadikan transparan, properti ini efektif jika picture yang masukkan adalah (*.bmp), dan setting properti UseMaskColor adalah True
MouseIcon sda
MousePointer sda
Picture Digunakan untuk menentukan gambar yang digunakan, properti ini efektif jika setting properti Style adalah (1 - Graphical)
Style Digunakan untuk menentukan jenis style pada kontrol option (0 - Standard, 1 - Graphical)
TabIndex sda
TabStop sda
Tag sda
ToolTipText sda
Top sda
UseMaskColor Digunakan akan warna yang ditentukan pada MaskColor efektif atau tidak (False, True)
Value Adalah nilai kontrol option button (True - terpilih, False - tidak terpilih)
Visible Digunakan untuk menentukan apakah kontrol Visibel atau tidak.
Width sda

Gambar 3-3, Contoh properti pada kontrol Option

Adapun event-event yang efektif pada kontrol option adalah :

Event Keterangan
Click sda, pada option event ini juga dibangkitkan ketika kontrol menerima fokus, maupun ketika pemakai menekan space pada kontrol bersangkutan.
DblClick sda
GotFocus sda
KeyDown sda
KeyPress sda
KeyUp sda
LostFocus sda
MouseDown sda
MouseMove sda
MouseUp sda
Validate sda

Adapun metoda yang efektif pada kontrol Option adalah :

Metoda Keterangan
Move sda
Refresh sda
Setfocus sda, pada kontrol option, metoda ini akan membangkitkan event Click.
ZOrder sda

Check

Digunakan untuk menampilkan beberapa pilihan yang dapat dipilih lebih dari satu

Gambar 3-4, Contoh properti pada kontrol Check

Properti kontrol Check, maupun event dapat dilihat pada properti Option

Frame

Digunakan untuk mengelompokan sekelompok kontrol. Pemakaian kontrol frame yang paling nyata adalah untuk mengelompokan sejumlah option, sebagaimana kita ketahui, pada suatu form, hanya 1 option yang dapat dipilih setiap saat, hal ini dapat diatasi dengan pemakaian frame, sehingga option dapat dipilih sesuai dengan konteks yang diwakili.

Properti Fungsi
Appearance sda
BackColor sda
BorderStyle sda
Caption sda
CauseValidation sda
DragIcon sda
DragMode sda
Enabled sda
Font sda
ForeColor sda
Height sda
Index sda
Left Digunakan untuk menentukan jarak kiri kontrol dari kontainernya.
MouseIcon sda
MousePointer sda
TabIndex sda
Tag sda
ToolTipText sda
Top sda
Visible Digunakan untuk menentukan apakah kontrol Visibel atau tidak, jika Visible false, maka semua kontrol yang berada diatasnya menjadi tidak kelihatan.
Width sda

Gambar 3-5, Contoh properti pada kontrol Frame

Adapun event-event yang efektif pada kontrol frame adalah :

Event Keterangan
Click sda
DblClick sda
MouseDown sda
MouseMove sda
MouseUp sda

Adapun metoda yang efektif pada kontrol Frame adalah :

Metoda Keterangan
Move sda
Refresh sda
ZOrder sda

CommandButton

Digunakan untuk mendapatkan konfirmasi pemakai untuk pelaksanaan fungsi tertentu.

Properti Fungsi
Alignment sda
Appearance sda
BackColor sda
Cancel Digunakan untuk menentukan apakah command button merupakan perintah Cancel untuk form tersebut , jika properti ini True, maka ketika pemakai menekan ESC, akan membangkitkan event Click untuk kontrol tersebut.
Caption sda
CauseValidation sda
Default Digunakan untuk menentukan apakan command button merupakan Default command untuk form tersebut, jika properti ini True, maka ketika pemakai menekan Enter, akan membangkitkan event Click untuk kontrol tersebut.
DragIcon sda
DragMode sda
Enabled sda
Font sda
ForeColor sda
Height sda
Index sda
Left Digunakan untuk menentukan jarak kiri kontrol dari kontainernya.
MaskColor Digunakan untuk warna pada bitmap yang akan dijadikan transparan, properti ini efektif jika picture yang masukkan adalah (*.bmp), dan setting properti UseMaskColor adalah True
MouseIcon sda
MousePointer sda
Picture sda
Style sda
TabIndex sda
TabStop sda
Tag sda
ToolTipText sda
Top sda
UseMaskColor sda
Visible Digunakan untuk menentukan apakah kontrol Visibel atau tidak.
Width sda

Gambar 3-6, Contoh properti pada kontrol Command

Adapun event-event yang efektif pada kontrol commandbutton adalah :

Event Keterangan
Click sda, pada commandbutton, event ini juga dibangkitkan ketika pemakai menekan space pada kontrol tersebut.
GotFocus sda
KeyDown sda
KeyPress sda
KeyUp sda
LostFocus sda
MouseDown sda
MouseMove sda
MouseUp sda

Adapun metoda yang efektif pada kontrol CommandButton adalah :

Metoda Keterangan
Move sda
Refresh sda
Setfocus sda
ZOrder sda

Visual Basic Application

Deklarasi Konstanta

Anda sering menjumpai suatu code yang mengandung nilai yang berulang-ulang dimunculkan, atau anda menemukan bahwa angka tersebut susah diingat. Dalam hal ini anda dapat membuat code anda menjadi lebih mudah dibaca-lebih mudah ditangani-dengan menggunakan suatu konstanta. Suatu konstanta adalah nama yang menyimpan dari suatu nilai yang tidak dapat berubah. Ada dua sumber dari suatu konstanta :

Membuat Konstanta Anda Sendiri

Syntax untuk deklarasi konstanta adalah :
  
[Public|Private] Const constantname [As type] = expression
  
Contoh :

Const Pi = 3.12159265358979
Public Const Planet As Integer= 9
Const ReleaseDate = #7/1/95#

Scope dari suatu user-defined konstanta

Struktur Perulangan

Struktur loop memperbolehkan anda untuk melaksanakan sekelompok baris lebih dari satu kali :

Do...Loop

Gunakan Do loop untuk mengeksekusi suatu blok statement dengan jumlah perulangan yang tak terhingga, ada beberapa Do...Loop statement, tetapi masing-masing mengevaluasi suatu kondisi untuk menentukan apakah melanjutkan eksekusi

Berikut ini adalah statement Do…Loop, yang dijalankan selama kondisi benar :

Do While condition
   statements
Loop

Ketika Visual menjalankan Do loop ini, pertama kali akan di coba kondisinya, jika kondisi False (zero), akan diloncati semua statements yang mengikuti kondisi tersebut. Visual Basic akan menjalankan statements jika kondisi benar dan kembali ke Do…Loop berikutnya.

Function Faktorial (x)
Dim Hasil As Double
Dim Count As Long
Hasil = 1
count = 2
Do While Count <= x
   Hasil = Hasil * count
   count = count + 1
Loop
Faktorial = count
End Function

Variasi lain dari statement Do…Loop, yang menjamin minimal satu kali statement dijalankan :

Do
   statements
Loop While condition

Dua variasi yang analog dengan dua contoh sebelumnya adalah perulangan minimal satu kali. Dan berikut ini adalah berulang atau tidak sama sekali :

Do Until condition
   statements
Loop
Do
   statements
Loop Until condition

For...Next

Do loops bekerja dengan baik, ketika anda tidak tahu berapa bayak kali untuk butuhkan untuk menjalankan statement. Ketika anda mengetahui harus menjalankan statement sejumlah kali, bagaimanapun For…Next adalah pilihan yang lebih baik. Tidak seperti Do Loop, For…loop menggunakan suatu variabel yang disebut counter yang mana akan bertambah atau berkurang pada setiap perulangan. Syntaxnya adalah :

For counter = start To end [Step increment]
    statements
Next [counter]

Argumen counter, start, end, dan increment semuanya adalah numerik

  1. Dalam melakukan For loop, Visual Basic :
  2. Menset nilai counter sama dengan start
  3. Mencoba apakah counter lebih besar dari end. Jika ya, Visual Basic meninggalkan looping tersebut.
  4. Menjalankan statements tersebut.
  5. Menaikkan counter dengan 1 atau dengan nilai step yang ditentukan
  6. Mengulangi langkah 2 sampai 4

Code berikut akan mencetak semua item yang terdapat pada suatu daftar list.

Private Sub Form_Click ()
Dim I As Integer
For i = 0 To List1.ListCount-1
 Print List1.List(I)
Next
End Sub

Struktur Kendali Nested

Anda dapat meletakkan suatu struktur kendali didalam struktur kendali lainnya, yang dikenal dengan istilah nested. Struktur kendali pada Visual Basic dapat nested sebanyak level yang anda inginkan.

Meninggalkan suatu Struktur Kendali

Statement Exit memperbolehkan anda untuk keluar langsung dari suatu For loop, Do Loop, syntax untuk statement Exit adalah sederhana : Exit For dapat muncul sebanyak mungkin dalam suatu For. Loop, demikian juga Exit Do untuk Do loop.

For counter = start To end [Step increment]
   [statementblock]
   [Exit For]
   [statementblock]
Next [counter[, counter] [,...]]
Do [{While | Until} condition]
   [statementblock]
   [Exit Do]
   [statementblock]
Loop 

Statement Exit Do bekerja pada semua versi syntax Do loop.
Exit For dan Exit Do adalah kadang-kadang perlu untuk keluar dari suatu loop dengan segera, tanpa melakukan iterasi yang berikutnya.

Soal dan Latihan

Latihan 1, Mengenal Properti Label, Text, Option, Check, Frame dan Command

Latihan 2, Memahami beberapa event yang umum pada kontrol.

Latihan 3, Tantangan melengkapi program data pemakai Telepon Latihan Bab2

Perhatian : Tutorial ini hanya untuk dipergunakan di forum diskusi indoprog-vb, untuk pemakaian lain-lain harus mendapat ijin dari penulis.


Dibuat  oleh hendra@indoprog.com
Medan - Sumatera Utara
Indonesia