Dizileri İç İçe Döngüye Eklemek
02 Ocak 2021
826
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 | |
|---|---|
| Farklı Kaydetme | F12 |
| İşlemi Tamamlama/Onaylama | Enter |
| Bir Ekran Sağa Git | Alt PgDn |
| Bir Ekran Aşağı Git | PgDn |
| Ekranı Küçültme | Ctrl F5 |