Kodlar
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim isanlar = {{"Mehmet", 1996}, {"Buse", 1995}, {"Başak", 1990},
{"Burak", 1982}, {"Eser", 1973}}
For index0 = 0 To isanlar.GetUpperBound(0)
'isanlar.GetUpperBound(0): Dizinin 1.satırı okunuyor (İsimler)
For index1 = 0 To isanlar.GetUpperBound(1)
'isanlar.GetUpperBound(1): Dizinin 2.satırı okunuyor (Doğum tarihleri
RichTextBox1.Text = RichTextBox1.Text + isanlar(index0,
index1).ToString & "
"
Next
Next
End Sub
End Class
4.4. Statik Diziler
Statik kelimesi durağan, sabit anlamlarına gelir. Eğer dizinin kaç elemandan oluşacağı
biliniyorsa bu tür dizilere statik dizi adı verilir. Bellekte eleman sayısı kadar yer ayrılır ve
program sonlanıncaya kadar değişmez.
Aşağıdaki örnekte 6 elemanlı “akşam menü” isimli bir dizi vardır.
0
1
2
3
4
5
AKŞAM MENÜ
Çorba
Izgara tavuk
Pilav
Salata
Kazandibi
Türk Kahvesi
0
1
2
3
4
5
AKŞAM MENÜ
Çorba
Et sote
Makarna
[BOŞ]
Keşkül
Meyve suyu
Bu dizinin tanımlama satırı aşağıdaki gibi yazılır.
Dim akşam_menü(6) As Object
37