User Tools

Site Tools


k10:k10.3:k10.3.6:start

10.3.6 Do..Loop

Syntax:

DO [ WHILE Condition ] . .. [ BREAK | CONTINUE ] . .. LOOP [ UNTIL Condition ] 

With DO… LOOP a series of statements is repeated until the initial condition remains true or until the last condition becomes true. If neither WHILE nor UNTIL are used in the control structure, this results in an infinite loop that can only be exited using the BREAK statement. If the break statement itself is missing, there is an infinite loop that you can no longer stop.

10.3.6.1.1 Syntax description

The following table shows the individual parts of the control structure Do..Loop:

PartDescription
DoThe first statement in the control structure.
WhileIf While is used, the statements in the loop body are only executed if the subsequent Boolean expression is TRUE.
UntilIf Until is used, the instructions in the loop body are only executed until the subsequent Boolean expression is TRUE.
ConditionBoolean expressions
BreakJump from the control structure Do..Loop. The execution of the program is started with the next line after the control structure Do..Loop continued.
ContinueAll statements after Continue are ignored and a new run starts.
LoopThe last statement in the control structure.

Table 10.3.6.1.1.1: Description of the elements of Do..Loop

10.3.6.2 Examples

Example 1

Public Sub LVW2C(lv As ListView, c As Collection) ' ListView To Collection 
  If lv.Count > 0 Then 
     c.Clear 
     lv.MoveFirst() 
     DO
       c[lv.Item.Key] = lv.Item.Text 
     LOOP UNTIL lv.MoveNext() 
  Else 
    Message.Info("The channel list is empty!") 
    c.Clear 
    Return 
  Endif 
End

Example 2

Private Sub Variante_3(iAnfang As Integer, iEnde As Integer) 
  Dim iPartialsumme As Integer = 0 
  Dim iSummand As Integer = iAnfang 
 
  DO WHILE (iSummand < iEnde + 1) 
     iPartialsumme = iPartialsumme + iSummand 
     If IsIntegerRange(iPartialsumme) = False And b = False Then 
        txtPartialsumme.Text = "Error sum " & String.Chr(8713) & " INTEGER" 
        Return 
     Endif
     Inc iSummand 
  LOOP
 
  txtPartialsumme.Text = Str(iPartialsumme) 
 
' Alternative Variante 3.2: 
' WHILE (iSummand < iEndzahl + 1) 
'   iPartialsumme = iPartialsumme + iSummand 
'   INC iSummand 
' WEND ' While End 
' tboxPartialsumme.Text = Str(iPartialsumme) 
 
End ' Variante_3 - Kontrollstruktur DO..WHILE..LOOP

10.3.6.3 Syntactic Sugar

In the control structure DO… LOOP There are many instructions (While, Until, Break, Continue) that you have already got to know. Based on' http://de.wikipedia.org/wiki/Syntactic_Sugar',' syntactic sugar' means syntax extensions in a programming language. These extensions are alternative spellings that do not extend the functionality of a programming language not. Syntactic sugar can be traced back to elementary instructions of the language by changing the diction, because

Do While bedingung 
  ' sequence of instructions
Loop 

is a long version of While-Wend; just like

Do 
  ' sequence of instructions
Loop Until bedingung 

as a long version of Repeat-Until. Also

Do 
  ' sequence of instructions
Loop 

produces an endless loop like

While True 
  ' Sequence of instructions
Wend.

This means, however, that you can only use the control structure DO..LOOP, which is classified as “syntactic sugar” in Gambas. In example 2, the procedure with alternative 3.2 was demonstrated.

Download

Articles

Download

10.3.6 Do .. Loop

Syntax:

DO [ WHILE Condition ] . .. [ BREAK | CONTINUE ] . .. LOOP [ UNTIL Condition ] 

Mit DO .. LOOP wird eine Reihe von Anweisungen wiederholt, so lange die Anfangsbedingung wahr bleibt oder bis die letzte Bedingung wahr wird. Wenn in der Kontrollstruktur weder WHILE noch UNTIL verwendet werden, dann ergibt sich eine Endlosschleife, die nur über die BREAK-Anweisung verlassen werden kann. Fehlt selbst die Break-Anweisung, ergibt sich eine Endlosschleife, die Sie nicht mehr stoppen können.

10.3.6.1 Syntaxbeschreibung

In der folgenden Tabelle werden die einzelnen Teil der Kontrollstruktur Do .. Loop beschrieben:

TeilBeschreibung
DoDie erste Anweisung in der Kontrollstruktur.
WhileWenn While verwendet wird, dann werden die Anweisungen im Schleifenkörper nur ausgeführt, wenn der nachfolgende boolsche Ausdruck TRUE ist.
UntilWenn Until verwendet wird, dann werden die Anweisungen im Schleifenkörper nur ausgeführt, bis der nachfolgende boolsche Ausdruck TRUE ist.
ConditionBoolscher Ausdruck
BreakSprung aus der Kontrollstruktur Do .. Loop. Die Ausführung des Programms wird mit der nächsten Zeile nach der Kontrollstruktur Do .. Loop fortgesetzt.
ContinueAlle Anweisungen nach Continue werden ignoriert und ein neuer Durchlauf beginnt.
LoopDie letzte Anweisung in der Kontrollstruktur.

Tabelle 10.3.6.1.1: Beschreibung der Elemente von Do .. Loop

10.3.6.2 Beispiele

Beispiel 1

Public Sub LVW2C(lv As ListView, c As Collection) ' ListView To Collection 
  If lv.Count > 0 Then 
     c.Clear 
     lv.MoveFirst() 
     DO
       c[lv.Item.Key] = lv.Item.Text 
     LOOP UNTIL lv.MoveNext() 
  Else 
    Message.Info("Die Senderliste ist leer!") 
    c.Clear 
    Return 
  Endif 
End ' LVW2C(...) 

Beispiel 2

Private Sub Variante_3(iAnfang As Integer, iEnde As Integer) 
  Dim iPartialsumme As Integer = 0 
  Dim iSummand As Integer = iAnfang 
 
  DO WHILE (iSummand < iEnde + 1) 
     iPartialsumme = iPartialsumme + iSummand 
     If IsIntegerRange(iPartialsumme) = False And b = False Then 
        txtPartialsumme.Text = "FEHLER! SUMME " & String.Chr(8713) & " INTEGER" 
        Return 
     Endif ' Partialsumme-Überlauf ? 
     Inc iSummand 
  LOOP
 
  txtPartialsumme.Text = Str(iPartialsumme) 
 
' Alternative Variante 3.2: 
' WHILE (iSummand < iEndzahl + 1) 
'   iPartialsumme = iPartialsumme + iSummand 
'   INC iSummand 
' WEND ' While End 
' tboxPartialsumme.Text = Str(iPartialsumme) 
 
End ' Variante_3 - Kontrollstruktur DO..WHILE..LOOP

10.3.6.3 Syntactic Sugar

In der Kontrollstruktur DO .. LOOP kommen viele Anweisungen vor (While, Until, Break, Continue), die Sie bereits kennengelernt haben. In Anlehnung an 'http://de.wikipedia.org/wiki/Syntactic_Sugar' versteht man unter 'syntaktischem Zucker' Syntaxerweiterungen in einer Programmiersprache. Diese Erweiterungen sind alternative Schreibweisen, die jedoch die Funktionalität einer Programmiersprache nicht erweitern. Syntaktischer Zucker lässt sich durch Änderung der Diktion auf elementare Anweisungen der Sprache zurückführen, denn

Do While bedingung 
  ' Anweisungsfolge 
Loop 

ist eine lange Version von While-Wend; genauso wie

Do 
  ' Anweisungsfolge 
Loop Until bedingung 

als lange Version von Repeat-Until. Auch

Do 
  ' Anweisungsfolge 
Loop 

produziert eine Endlosschleife wie

While True 
  ' Anweisungsfolge 
Wend.

Das bedeutet aber, dass man auf die Verwendung der Kontrollstruktur DO .. LOOP verzichten kann, die man in Gambas als “syntactic sugar” einstuft. Im Beispiel 2 wurde das Vorgehen mit der Alternative 3.2 demonstriert.

Download

Artikel

Download

The website uses a temporary session cookie. This technically necessary cookie is deleted when the browser is closed. You can find information on cookies in our privacy policy.
k10/k10.3/k10.3.6/start.txt · Last modified: 02.07.2018 (external edit)

Page Tools