Komponen Toolbar dan Image List pada Visual Basic

Komponen Toolbar merupakan icon-icon yang berisi perintah yang digunakan untuk melengkapi menu. Pada umumnya perintah pada toolbar identik dengan perintah-perintah yang ada pada menu. Komponen toolbar termasuk dalam library Microosft Common Control 6.0. Untuk menambahkannya pada menu Project pilih Component... atau tekan Ctrl + T. Isi Centang pada Microosft Common Control 6.0.



Penggunaan komponen toolbar harus dilengkapi dengan komponen Image List untuk menambahkan gambar pada toolbar. Contoh penggunaan komponen toolbar dan image list:



Langkah-Langkah Menambahkan Toolbar

1. Tambahkan komponen toolbar dan image list pada form dengan double klik icon dan pada toolbox.
2. Keluarkan properties untuk image list dengan klik kanan pada image list, kemudian pilih Properties.
   
   
   
   
3.  Pada dialog Properties, di Tab General pilih ukuran gambar yang ingin disisipkan pada toolbar.
   
   
   
   Pada tab Images tambahkan gambar dengan klik Insert Picture.
   
   
   
   Perhatikan pada kolom Index, index pada setiap gambar akan berbeda. Index ini nantinya akan digunakan untuk mengisi gambar pada toolbar.
   
   
4. Lakukan juga pengaturan pada toolbar dengan memunculkan propertiesnya. Pada tab general di kolom ImageList, pilih nama Image List yang anda tambahkan pada form.
   
   
   
   Pada tab Buttons, klik Insert Button untuk menambahkan toolbar. Pada kolom Image sesuaikan Index image yang ada pada image list.
   
   
   
   Index adalah index dari setiap toolbar. Index bisa digunakan untuk memberi perintah pada toolbar.
   Caption adalah text yang dimunculkan pada toolbar. Bila anda sudah menggunakan imagelist sebaiknya caption tidak diisi lagi.
   Key merupakan kunci untuk memberikan perintah selain Index
   ToolTipText adalah text yang akan dimunculkan saat mouse diarahkan pada toolbar.
   
   
5. Klik Apply untuk melihat hasilnya. Bila semua toolbar telah ditambahkan, klik OK.

Mengisi perintah pada toolbar


Untuk mengisi perintah pada masing masing toolbar kita bisa menggunakan index atau key sebagai acuan. Double klik pada toolbar, kemudian isi kode seperti berikut:

Private Sub tbToolBar_ButtonClick(ByVal Button As MSComCtlLib.Button)
   Select Case Button.Key
      Case "New"
         'isi perintah untuk new
      Case "Open"
         'isi perintah untuk open
      Case "Save"
         'isi perintah untuk save
      Case "Print"
         'isi perintah untuk print
      Case "Cut"
         'isi perintah untuk cut
      Case "Copy"
         'isi perintah untuk copy
      Case "Paste"
         'isi perintah untuk paste
      Case "Bold"
         'isi perintah untuk bold
   End Select
End Sub