VB-Tec.de Visual Basic - Technik, FAQ, Tricks, Beispiele

Möchte man einen Code-Abschnitt für verschiedene Werte durchlaufen, die nicht-numerisch sind oder keine Reihe bilden (sonst könnte ja auch eine For-Next-Schleife verwendet werden), so kann man sich folgenderweise behelfen:

Dim Monat As Variant

For Each Monat In Array("Jan.", "Feb.", "März", "...", "Dez.")
  Print "bla bla "; Monat; " bla bla"
Next Monat