Contoh Cara Membuat Dan Menggunakan (Array) Object[] Yang Tidak Ditentukan Jumlah Arraynya ~Tutorial Gambas

Maksud dari tidak ditentukan jumlah arraynya ialah saat pendeklarasian, dan tentu saja jumlah array harus ditentukan, namun saat sudah diketahui jumlah datanya. Cara ini biasa digunakan saat jumlah data bervariasi untuk dimasukkan pada  Banyak Object yang sama jenisnya seperti TextBox misalnya.

Carra ini saya gunakan saat membuat laporan yang berupa baris dan kolom semacam gridview, sedangkan Objectnya adalah ReportLabel.

Berikut contoh penggunaannya.

Buatlah Form kosong dengan Lebar 574 dan tinggi 525. Adapun isi dalam class:

' Gambas class file

‘Jumlah Array Object tidak ditentukan

Private Tobjek As New Object[]

Public Sub Form_Open()

   Dim n As Byte

   ‘Menentukan jumlah Object (Array) dimana Object sebagai TextBox semua

   ‘Jumlah Objek ada 10 (dimulai dari 0)

   For n = 0 To 9

     Tobjek.Add(TextBox)

   Next

   

  ‘Membuat Object index ke 0

   Tobjek[0] = New TextBox(Me)

   Tobjek[0].Width = 40

   Tobjek[0].Height = 40

   Tobjek[0].Y = 20

   Tobjek[0].X = 200

   Tobjek[0].Text = "aku"

   ‘

   Membuat Object index ke 1

   Tobjek[1] = New TextBox(Me)

   Tobjek[1].Width = 40

   Tobjek[1].Height = 40

   Tobjek[1].Y = 100

   Tobjek[1].X = 200

   Tobjek[1].Text = "opo"

End

Dari contoh diatas hanya membuat 2 dari 10 Object, sebagai contoh saja.

Sebenarnya ada yang lebih simple dari contoh skript di atas, yakni seperti membuat objek lainnya

Private Tobjek As Object[]

Public Sub Form_Open()

   Tobjek = New Object[10]

   ……

   ……

   ……

End

Maka hasilnya sama.

Begitu juga saat membuat Array Object 2 dimensi

Private Tobjek As Object[]

Public Sub Form_Open()

   Tobjek = New Object[10, 4]

   ……

   ……

   ……

End

Semoga bermanfaat