Dizi elemanlarına değer aktarmak için aşağıdaki gibi bir kod yazılır;
ad(0)
ad(1)
ad(2)
ad(3)
ad(4)
=
=
=
=
=
“Mehmet”
“Buse”
“Başak”
“Burak”
“Eser”
İstenirse dizi tanımlanırken dizi elemanlarına değerleri aktarılabilir. Bu tanımlamada
dizi değişkenine isim verirken parantez içinde dizinin eleman sayısı belirtilmez.
Dim ad ( ) as string = {“Mehmet”, “Buse”, “Başak”, “Burak”, “Eser”}
Örnek 11:
5 elemanlı ad dizi değişkeni tanımlanmış, dizi değişkenin her elemanına bir
değer verilmiş ve son olarak dizi değişkeninin her elemanı ekrana
yazdırılmıştır.
Ekran Görüntüsü
Kodlar
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim ad(4) As String
ad(0) = "Mehmet"
ad(1) = "Buse"
ad(2) = "Başak"
ad(3) = "Burak"
ad(4) = "Eser"
Dim i = 0
Do Until i = 5
ListBox1.Items.Add(ad(i))
i = i + 1
Loop
End Sub
End Class
35