Dizileri İç İçe Döngüye Eklemek
02 Ocak 2021
815
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 | |
|---|---|
| Koyu Yazdırma / Alternatif | Ctrl 2 |
| TL Simgesi Eklemek | Ctrl Alt T |
| Sayfayı Sağa Sola Taşıma | Alt Sürükle |
| Kes / Alternatif | Shift Delete |
| Sayfa Yapısı Kenar Boşlukları Sekmesini Açma | Alt P J Ö |