Array

1.1 Apa itu Array ? 

Arraymerupakan sekumpulan nilai data yang “dikelompokkan” dalam sebuahvariabel. Array digunakan bila ada beberapa nilai data yang tipedatanya sama dan akan mendapat perlakuan yang sama pula. Misalnya, ada10 nilai data dengan tipe string dan akan diolah dengan cara yang sama,maka akan lebih mudah jika menggunakan sebuah array dibandingkan bilamenggunakan 10 variabel yang berbeda. Setiap nilai data di dalam sebuaharray disebut elemen array dan masing-masing dibedakan dengan nomerindeksnya.

1.2 Menggunakan Array

Sebuah array dideklarasikan dengan cara yang sama dengan variabel, yaitu menggunakan perintah Dim,
kemudian diikuti dengan tanda kurung dan jumlah elemen arraynya dikurangi 1 :

Dim nama_array(jumlah_elemen - 1) As tipe_data

Contoh : 

Dim NamaSiswa(99) As String  (array NamaSiswa akan mempunyai elemen sebanyak 100 dengan nomer indeks mulai dari 0 s/d 99).

Selanjutnya untuk mengisi nilai data ke dalam array :

nama_array(no_indeks) = nilai_data

Contoh :

NamaSiswa(0) = “umar” 

Namasiswa(1) = “fatimah” 

…

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

For i = 0 To 99

       NamaSiswa(i) = “”

Next i 

Lebih mudah bukan ?

Catatan :

• Agar nomer indeks array dimulai dari 1 (bukan 0), bisa menggunakan perintah Option Base 1sebelum perintah Dim-nya, 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

• Untuk mengetahui berapa jumlah elemen di dalam sebuah array, bisa menggunakan perintah Ubound(nama_array), contoh : 

          Dim NamaSiswa(1 To 100) As String 

          Dim JmlElemen As Integer 
 

          JmlElemen = Ubound(NamaSiswa)      >>  hasilnya 100

• Bilajumlah elemen array yang dibutuhkan tidak diketahui atau ingin bisadiubah-ubah, maka bagian jumlah_elemen pada perintah Dim tidak perludiisi, contoh :

          Dim NamaSiswa() As String 

• Untuk mengubah jumlah elemen array digunakan perintah Redim :

           Redim [Preserve] nama_array(jumlah_elemen) 

          

          Contoh :

          Redim NamaSiswa(1 To 150)

          (jumlah elemen array NamaSiswa menjadi 150 dengan nomer indeks dari 1 s/d 150)