- Katılım
- 25 Ocak 2009
- Mesajlar
- 110
- Excel Vers. ve Dili
- Excel-2007 Türkçe
Merhaba arkadaşlar; kitapta gördüğüm bir kodu anlamaya çalışırken kafam daha da karıştı.
Private Sub_Button3_Click
Dim DiziDeger(,) As String={{"ANKARA", "İZMİR", "RİZE"},{"BURSA", "ORDU", "BOLU"}}
Dim i,j As Integer
For i=0 To DiziDeger.GetUpperBound(0)
For j=0 To DiziDeger.GetUpperBound(1)
ListBox1.Items.Add(DiziDeger(i,j))
Next
Next
End Sub
Şimdi arkadaşlar ben anladığım kadarını açıklamaya çalışayım; yanlış anladığım biryer varsa lütfen düzeltin.
Burada iki boyutlu bir dizi mevcut.
0.Sütun 1. Sütun 2.sütun
0.Satır (ANKARA) (İZMİR) (RİZE)
1.Satır (BURSA) (ORDU) (BOLU)
GetUpperBound(0) ile peki tam olarak ne demek istiyor acaba?
Bunu Me.Text=DiziDeger.GetUpperBound(0) şeklinde yazdırınca 1 değeri olduğunu anlıyorum.
Aynı şekilde;
Me.Text=DiziDeger.GetUpperBound(1) şeklinde yazdırınca da 2 değerini buluyorum. Açıklayabilir misiniz lütfen?
Private Sub_Button3_Click
Dim DiziDeger(,) As String={{"ANKARA", "İZMİR", "RİZE"},{"BURSA", "ORDU", "BOLU"}}
Dim i,j As Integer
For i=0 To DiziDeger.GetUpperBound(0)
For j=0 To DiziDeger.GetUpperBound(1)
ListBox1.Items.Add(DiziDeger(i,j))
Next
Next
End Sub
Şimdi arkadaşlar ben anladığım kadarını açıklamaya çalışayım; yanlış anladığım biryer varsa lütfen düzeltin.
Burada iki boyutlu bir dizi mevcut.
0.Sütun 1. Sütun 2.sütun
0.Satır (ANKARA) (İZMİR) (RİZE)
1.Satır (BURSA) (ORDU) (BOLU)
GetUpperBound(0) ile peki tam olarak ne demek istiyor acaba?
Bunu Me.Text=DiziDeger.GetUpperBound(0) şeklinde yazdırınca 1 değeri olduğunu anlıyorum.
Aynı şekilde;
Me.Text=DiziDeger.GetUpperBound(1) şeklinde yazdırınca da 2 değerini buluyorum. Açıklayabilir misiniz lütfen?