IBM Lotus Symphony
|
Шарт "True" болып тұрғанда немесе болғанша Орындау және Тұықталу арасындағы нұсқауларды қайталайды.
Орындау [{While | Until} condition = True]
нұсқау блогы
[Exit Do]
нұсқау блогы
Тұйықталу
немесе
Жасау
нұсқау блогы
[Exit Do]
нұсқау блогы
Тұйықталу [{While | Until} condition = True]
Шарт: "True" немесе"False" мәнін бағалайтын сандық немесе жолдық мәнді салыстыру.
Нұсқау блогы: шарт "True" болып тұрғанда немесе болғанша қайталау керек мәлімдемелер.
Do...Loop нұсқауы белгілі бір шарт "True" болып тұрғанда немесе болғанша тұйықталуды жасайды. Тұйықталудан шығу шарты Орындау немесе Тұйықталу нұсқауларынан кейін енгізілуі керек. Төмендегі мысалдар жарамды тіркестер болып табылады:
Әзірше орындау шарты = True
...нұсқау блогы
Тұйықталу
Әзірше орындау және Тұйықталу нұсқауларының арасындағы нұсқау блогы шарт "true" болғанша қайталана береді.
Осыған дейін орындау шарты = True
...нұсқау блогы
Тұйықталу
Осыған дейін орындау және Тұйықталу нұсқауларының арасындағы нұсқау блогы шарт "false" болғанша қайталана береді.
Жасау
...нұсқау блогы
Әзірше тұйықталу шарты = True
Орындау және Тұйықталу нұсқауларының арасындағы нұсқау блогы шарт "true" болғанша қайталана береді.
Жасау
...нұсқау блогы
Осыған дейін тұйықталу = True
Орындау және Тұйықталу нұсқауларының арасындағы нұсқау блогы шарт "true" болғамағанша қайталана береді.
Тұйықталуды шартсыз аяқтау үшін Exit Do нұсқауын пайдаланыңыз. Бұл нұсқаудыDo... Loop нұсқауының кез келген бөлігіне қосуға болады. Сондай-ақ, шығу шартын If...Then құрылымын төмендегідей пайдаланып анықтауға болады:
Do...
мәлімдемелер
Егер шарты = True Then Exit Do
мәлімдемелер
Loop...
Қосымша ExampleDoLoop
sFile ұяшығын жол ретінде қайтару
sPath ұяшығын жол ретінде қайтару
sPath = "c:\"
sFile = Dir$( sPath ,22)
sFile <> болса, "" Онда
Жасау
MsgBox sFile
sFile = Dir$
Осыған дейін тұйықталу sFile = ""
Болса аяқтаңыз
Аяқталу ішкі элементі