koleksi objek pada VB 6.0

Pengertian Koleksi Objek 

Suatu objek yang digunakan dalam form biasanya berdiri sendiri, jadi jika anda ingin mengubah property ke semua objek menyebabkan listing menjadi panjang, maka digunakan koleksi yang dapat menghemat penulisan.

Koleksi adalah kumpulan komponen yang dapat berfungsi sejalan, sangat berguna saat akan mendefinisikan sebuah proses yang menyangkut kontrol yang ada pada form.

Cara Mengakses Koleksi Objek

v  Koleksi sementara

Dapat dilakukan dengan meng-klik control-kontrol pada form yang akan dijadikan sebagai satu group koleksi sambil menekan tombol Ctrl. Biasanya digunakan untuk memindahkan objek secara bersamaan hanya pada saat tersebut.

v  Koleksi dengan Controls

Untuk mem permudah koleksi semua objek dalam satu form digunakan property controls

Sintaknya : [Objek].controls

Dimana [objek] lebih umu dinyatakan sebagai nama form yang control-kontrolnya dijadikan koleksi proses.

Contoh program dengan koleksi controls:

Buat form sebagai berikut

Caranya :

1.        Buat project baru

2.       Atur property untu kontrolnya sebagai berikut :

kontrol	Properti	nilai
Label1	Caption Font	Selamat tahun baru Arrial Narrow,Bold,22
Command 1	caption	Jalankan

3.       Klik ganda pada Command1,lalu ketikkan koding berikut:

Private Sub Command1_Click()

Form2.Show

Form2.Visible = False

Command1.Visible = False

End Sub

4.       Tambahkan form baru dengan cara meng-klik add form

5.       Letakkan sebuah control timer pada form2.

6.       Klik ganda pada form2, lalu ketikkan kode programnya :

Private Sub Form_Load()

Timer1.Interval = 100

Endsub

7.       Klik ganda control timer1 pada form2, lalu ketikkan koding berikut:

Private Sub Timer1_Timer()

For Each control In Form1.Controls

‘form1.control adalah contoh penggunaan koleksi ini.

Control.Left = control.Left + 120

Next Kontrol

End sub

8.       Jalankan aplikasi tersebut dengan menekan tombol F5.