ARRAY

Array digunakan untuk menyimpan sekumpulan data yang sejenis dalam sebuah variabel dan nilai yang dimasukkan dapat diakses menggunakan indeks.

A. Deklarasi Array

Untuk mendeklarasikan variabel array, sintakasnya mirip dengan variabel lainnya. Anda dapat menggunakan pernyatan Dim atau aksesibilitas (Public, Private, Friend dan sebagainya), perbedaannya anda harus menambahkan parantheses/tanda kurung setelah nama variabel untuk menunjukkan bahwa itu adalah array.

Sebagai contoh untuk mendeklarasikan array yang memiliki 10 data gunakan sintaks berikut:

Dim Nomor (9) As Integer

Array di atas memiliki 10 data dengan indeks 0 sampai 9. Jadi perhitungan indeks pada array dimulai dengan 0. Batas bawah array dapat dilihat menggunakan fungsi LBound(), lower bound dan nilainya pasti 0. Sedangkan batas atas array dapat dilihat menggunakan fungsi UBound(), upper bound.

Anda dapat memasukkan nilai ke elemen array seperti kode berikut:

Dim Primata(3) As String

Primata(0) = “Orang Utan”

Primata(1) = “Gorilla”

Primata(2) = “Monyet”

Primata(3) = “Babbon”

              Dim MyWeek as string

              MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")

Untuk “mengosongkan” nilai data, bisa menggunakan struktur kontrol For…Next :

For i = 0 To 99

NamaSiswa(i) = “”

Next i

Agar nomer indeks array dimulai dari 1 (bukan 0), bisa menggunakan perintah Option Base 1 sebelum perintah Dim. Contoh

Option Base 1

Dim NamaSiswa(100) As String

Atau bisa juga menggunakan kata To di dalam penentuan jumlah elemen array, contoh :

Dim NamaSiswa(1 To 100) As String.

Array Multidimensi

Kadangkala kita memerlukan memasukkan data pada array multidimensi seperti memasukkan data Nama dan Umur, Produk, Harga dan sebagainya. Keuntungan menggunakan array mutlidimensi adalah array akan lebih mudah dikelola. Tabel berikut membandingkan array satu dimensi dengan dua dimensi.

Perbandingan array satu dimensi dengan multidimensi

0		Budi		34		Budi	34
1		Dewi		23		Dewi	23
2		Yona		18		Yona	18
3		Tomy		52		Tomy	52
4		Joni		74		Joni	74

Satu Dimensi Dua Dimensi

Array dua dimensi memiliki dua pengenal.Pertama adalah baris (urutan Nama dalam array). Dan pengenal kedua adalah kolom (Nama atau Umur). Contoh penerapannya:

NamaUmur(3, 0) ‘Hasilnya Nama keempat yaitu: Tomy

NamaUmur(2, 1) ‘Hasilnya umur ketiga yaitu: 18

Untuk memberikan data pada array multidimensi contoh berikut:

Dim Angka(2,2) As Integer

Angka(0, 0) = 2

Angka(0, 1) = 5

Array Dinamik

Jika anda belum tahu berapa jumlah elemen array, Anda dapat mendeklarasikan array sebagai array dinamik. Untuk membuat deklarasi array dinamik, kosongkan pada dimensi array contoh:

Dim ArrayDinamik() As Integer

Berikutnya dalam program jika Anda tahu berapa banyak elemen yang dimasukkan dalam array gunakan pernyataan Redim atau redimension dengan ukuran aktual. Contoh:

Redim ArrayDinamik (9)

Array dinamik dapat juga diterapkan pada array multidimensi seperti contoh berikut:

Dim Matriks() As Double

...”Kode

Redim Matriks(3, 2)

Kelemahan penggunaan Redim adalah tiap kali perintah dipanggil, semua nilai pada elemen sebelumnya akan hilang. Untuk mengatasinyaVB membuat perintah Preserve untuk menambah elemen array tanpa menghapus nilai sebelumnya. Contoh:

Dim Dosen() As String = {“Budi”, “Adi”, “Dedy”, “Ari”, “Hendy”}

Dosen(0) = ”Budi”

Dosen(1) = ”Adi”

Dosen(2) = ”Dedy”

Dosen(3) = ”Ari”

Dosen(4) = ”Hendy”

‘menambah Dosen!

Redim Preserve Dosen(6)

Dosen(5) = “Dewi”

Dosen(6) = “Putri”