vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2015
 
zurück

Summer-Special bei Tools & Components!
Gute Laune Sommer bei Tools & Components
Top Summer-Special - Sparen Sie teilweise über 100,- EUR
Alle sev-Entwicklerkomponenten und Komplettpakete jetzt bis zu 25% reduziert!
zum Beispiel:
  • Developer CD nur 455,- EUR statt 569,- EUR
  • sevDTA 2.0 nur 224,30 EUR statt 299,- EUR
  •  
  • vb@rchiv   Vol.6 nur 18,70 EUR statt 24,95 EUR
  • sevCoolbar 3.0 nur 58,70 EUR statt 69,- EUR
  • - Werbung -Und viele weitere Angebote           Aktionspreise nur für kurze Zeit gültig

    Befehlsreferenz - Allgemein: For..Next-Anweisung

    VB-Versionen:    VB4   |    VB5   |    VB6

    Beschreibung:
    Wiederholt einen Block von Anweisungen, bis ein Schleifenzähler einen bestimmten Wert erreicht hat.

    Syntax:

    For Counter = Anfang To Ende [Step Schrittweite]
      [Anweisungen]
      [Exit For]
    Next

    Parameter:
    Counter(Variable)
    AnfangDer Startwert von Counter
    EndeEndwert von Counter
    SchrittweiteOptional. Schrittweite, um die Counter verändert wird. Voreinstellung ist 1.
    AnweisungenDer Anweisungsblock, der Ausgeführt werden soll
    Exit ForOptional. Mit der Exit For Anweisung kann die Schleife frühzeitig abgebrochen werden

    Der Anweisungsblock innerhalb der For..Next-Schleife wird ausgeführt wenn Counter<=Startwert oder bei negativer Schrittweite Counter>=Endwert ist.

    Beim Ausführen der Next-Anweisung wird der Wert von Counter um Schrittweite geändert.

    Beispiel:

    Dim a As Integer, b As Integer
    Dim mText As String
     
    For a = 1 To 5 ' Schleife 1 beginnen.
      mText = mText & a ' aktueller Inhalt von a dem Text hinzufügen
      If a = 2 Then
        mText = mText & "-"
        For b = 9 To 1 Step -1 ' Schleife 2 beginnen.
          If b = 5 Then Exit For ' Wenn b=5 dann 2. Schleife abbrechen
          mText = mText & a
        Next
        mText = mText & "-"
      End If
    Next ' Schleife 1 beenden
     
    ' Inhalt von mText = 12-9876-345

    Siehe auch:   For Each..Next-Anweisung

    Diese Seite wurde bereits 25.282 mal aufgerufen.

    nach obenzurück
     
       

    Druckansicht Druckansicht Copyright ©2000-2015 vb@rchiv Dieter Otter
    Alle Rechte vorbehalten.
    Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

    Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel