VB.NET: Arrays

Array merupakan struktur data dasar dalam berbagai bahasa pemrograman, termasuk visual basic.
Array menyimpan kumpulan data/object bertipe sama.
Masing-masing elemen memiliki nomor yang menyatakan posisi/urutan.
Urutan dimulai dari 0 (lower bound) sampai nilai urutan tertentu (upper bound)

Berikut ini beberapa contoh cara mendeklarasikan array 1 dimensi

'Pendeklarasian Implicit: Tanpa ukuran (size) awal, tanpa nilai awal
Dim urutan() As Integer

'Pendeklarasian Explicit: Tanpa ukuran (size) awal, tanpa nilai awal
Dim urutan() As Integer = New Integer() {}

'Pendeklarasian Implicit: Dengan ukuran(size) awal, tanpa nilai awal
Dim urutan(6) As Integer

'Pendeklarasian Explicit: Dengan ukuran(size) awal, tanpa nilai awal
Dim urutan() As Integer = New Integer(6) {}

'Pendeklarasian Implicit: Ukuran awal tersirat dengan nilai awal
Dim urutan() As Integer = {1, 2, 3, 4, 5, 6, 7}

'Pendeklarasian Explicit: Dengan ukuran awal dan nilai awal
Dim urutan() As Integer = New Integer(6) {1, 2, 3, 4, 5, 6, 7}

Deklarasi array dapat dilakukan secara Implicit ataupun Explicit.
Kita dapat menentukan atau tidak menentukan ukuran dimensi array di awal.
Kita juga dapat menentukan atau tidak menentukan nilai array di awal.

Jika dalam VB6 programmer dapat menentukan lower bound dan upper bound, di .NET semua lower bound array visual basic dimulai dari nol (0).

Contoh:
Dim intArray(7) As Integer

Contoh diatas mendeklarasikan array dengen 8 elemen, bernomor 0 sampai 7.

Array bisa memiliki beberapa dimensi. Berikut ini contoh cara mendeklarasikannya:

Dim strArray(,) As String = _
    {{"1", "2", "3"}, {"Satu", "Dua", "Tiga"}}

strArray(1, 1) --> bernilai "Dua"
strArray(0, 2) --> bernilai "3"

Upper bound array bisa diubah dengan menggunakan keyword ReDim. Tapi jumlah dimensi array tidak dapat diubah.

    ReDim [Preserve] arrayName(newUpperBound)

Preserve digunakan untuk mempertahankan nilai yang sudah diberikan sebelumnya.

Kita dapat mengetahui nomor upper bound dan lower bound menggunakan fungsi LBound dan UBound.

    Dim intArray(8) As Integer
    MsgBox(UBound(intArray))  ' akan menampilkan "8"

Karena lower bound selalu dimulai dari nol, maka fungsi LBound selalu menghasilkan nilai nol.

Click here if you like this article.