Dizileri İç İçe Döngüye Eklemek
02 Ocak 2021
794
Dizileri İç İçe Döngüye Eklemek isimli kodu kullanarak, belirlediğiniz dizi içeriklerini istediğiniz gibi iç içe yönetme işlevini yerine getirebilirsiniz.
Sub Dizi_Dongu()
Dizi = Array(Array("Kedi", "Köpek"), Array("Tavşan", "Timsah"))
For r = 0 To 1
For c = 0 To 1
txt = txt & Dizi(r)(c) & " "
Next c
txt = txt & vbNewLine
Next r
MsgBox txt
End SubGerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
Üstteki kodda iç içe döngü ile iki ayrı Diziyi birlikte kullandık. Bir Dizi İfadesi oluşturup, o Dizi dönerken ikinci bir dizi ile içerikleri listeledik.
Etiketler :
| YARARLI KISAYOLLAR | |
|---|---|
| Ad Yöneticisi Penceresini Açma | Ctrl F3 |
| Hücreyi Sola Yaslı Hale Getirmek | Alt Ş SO |
| Altı Çizgili Yazdırma / Alternatif | Ctrl 4 |
| Bir Ekran Sola Git | Alt PgUp |
| Sütun Seçme | Ctrl Space |