Tombol banyak menggunakan index

Membangun software yang banyak menggunakan tombol. Pemakaian property index pada CommandButton tentunya akan sangat membantu sekali.

Artikel ini ditulis untuk catatan dan bisa mengingatkan kembali, lebih bersyukur lagi bila ada manfaatnya bagi pemula yang sedang mencari artikel visual basic 6 atau sedang belajar VB6.

property index dalam CommandButton bisa dimanfaatkan untuk meringkas penulisan code, tentu saja ini sangat membantu karena penulisan kode akan menjadi singkat. Ini ada pengaruhnya bila program di compile, setidaknya walaupun tidak banyak, akan memperkecil ukuran file exe yang dihasilkan nantinya.

untuk memanfaatkan property index pada CommandButton :

1. Buka VB6 klik StandardExe, pilih open
2. dobel klik label pada toolbox yang berada sebelah kiri
3. dobel klik commandbutton, copy command1, paste command1, Do you want to create a control array?, Click Yes
4. paste kembali sebanyak yang disukai
5. klik kanan pada form1, pilih view code
6. copykan, kode dibawah ini

'---code

Private Sub Command1_Click(Index As Integer)
   'Tulis kode disini dengan mengunakan
   'Pencabangan select case atau elseif untuk setiap index yang terpilih
    With Label1
        .Caption = "Anda memilih index : " & Index
        .FontSize = 14
        .Width = Me.Width
    End With
End Sub

'--- end code