Teknologi

PENGUNJUNG

mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHari ini76
mod_vvisit_counterKemarin99
mod_vvisit_counterMinggu ini269
mod_vvisit_counterBulan ini701
mod_vvisit_counterTotal37641
Menambahkan Kontrol Array Pada Saat Run-Time PDF Print E-mail
User Rating: / 0
PoorBest 
Visual Basic - Tips dan Trik Visual Basic
Umumnya kita menambahkan kontrol ke dalam form pada saat mendesain form tersebut (pada saat design time), tetapi Visual Basic juga menyediakan fasilitas untuk menambah jumlah kontrol array pada saat run-time dengan menggunakan pernyataan Load.
   
  •     Buatlah sebuah form dan tambahkan sebuah Command Button. Ubah properti Indexnya dengan    
              angka 0.
  •    Ke dalam Command Button tersebut tambahkan kode program seperti listing 2.
 
Listing 2. Event Click pada Command1

Private Sub Command1_Click(Index As Integer)
    Load Command1(1)
    Command1(1).Left = Command1(0).Left
    Command1(1).Top = Command1(0).Top + Command1(0).Height
    Command1(1).Caption = "Command Baru"
    Command1(1).Visible = True
End Sub    

  •  Perhatikan bahwa pada prosedur Command1_Click terdapat parameter Index As Integer yang harus ditambahkan.
  • Jalankan aplikasi tersebut. Jika Command Button di klik, maka otomatis akan ditambahkan sebuah Command Button baru tepat di bawahnya.