Array VB .NET

Apa itu Array ? Array adalah sekumpulan variabel yang memiliki tipe data yang sama dan dinyatakan dengan nama yang sama pula. Array merupakan konsep yang penting dalam pemrograman karena array memungkinkan untuk menyimpan data dalam jumlah banyak dan terindeks.
Array menggunakan indeks integer untuk menentukan urutan elemen-elemen didalamnya, indeks tersebut dimulai dari 0, 1, 2, dan seterusnya.

Mendeklarasikan variabel array
 untuk mendeklarasikan variabel array anda bisa menggunakan script dibawah ini :
Dim strarray() As String ' string menentukan tipe data array ' () menentukan ukuran array ' strarray menentukan nama array

Mendefinisikan array
setelah mendeklarasikan anda perlu untuk mendefinisikan dalam artian anda perlu menentukan ukuran array tersebut :
strarray = New String((5) - 1) {} ' 5 adalah ukuran array

Menetapkan nilai array
anda perlu menetapkan nilai array yang anda buat tadi dengan script dibawah ini :
strarray(0) = "satu" ' Mengisi array pertama dengan satu strarray(1) = "dua" ' Mengisi array kedua dengan dua strarray(2) = "tiga" ' Mengisi array ketiga dengan tiga strarray(3) = "empat" ' Mengisi array keempat dengan empat strarray(4) = "Lima" ' Mengisi array kelima dengan lima

Mengakses array dengan perualngan FOR
' mengakses array dengan perulangan for For i As Integer = 0 To strarray.Length - 1 comboBox1.Items.Add(strarray(i).ToString()) Next

Mengakses array dengan perualngan FOR EACH
' mengakses array dengan perulangan foreach For Each Str As String In strarray comboBox2.Items.Add(Str) Next

Berikut adalah cara pertama yaitu dengan mendeklarasikan variable myArray dengan menambahkan karakter () dibelakang variable.

Private Sub firstArray()

 Dim myArray(10) As Integer

 For i As Integer = 0 To 10

  myArray(i) = i * i

 Next

  

 Dim txt As String = ""

 For i As Integer = 0 To 10

  txt &= myArray(i) & vbCrLf

 Next

 MsgBox(txt)

End Sub

Berikut adalah cara pertama yaitu dengan mendeklarasikan variable myArray dengan menambahkan karakter () dibelakang variable.

Private Sub secondArray()

 Dim myArray As Array = Array.CreateInstance(GetType(Integer), 11)</span>

<span style="font-size: 12pt; font-family: Arial;"> For i As Integer = 0 To 10

  myArray.SetValue(i * i, i)

 Next</span>

<span style="font-size: 12pt; font-family: Arial;"> Dim txt As String = ""

  For i As Integer = 0 To 10

  txt &= myArray.GetValue(i).ToString & vbCrLf

 Next

 MsgBox(txt)

End Sub

Untuk cara diatas jika Option Strict Off, kita dapat memberi nilai array dengan cara myArray(i) = i * I, tetapi jika Option Strict On kita harus menggunakan myArray.SetValue(i * i, i). Begitu pula dengan pengambilan nilai jika Option Strict Off, pengambilan nilai array dapat dilakukan dengan myArray(i).ToString, tetapi jika Option Strict On, maka pengambilan nilai harus melalui myArray.GetValue(i).ToString