最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线



Do...Loop 語(yǔ)句

當(dāng)條件為 True 時(shí)或條件變?yōu)?True 之前重復(fù)執(zhí)行某語(yǔ)句塊。

Do [{While | Until} condition]
[statements]
[Exit Do]
[statements]
Loop

也可以使用下面的語(yǔ)法:

Do
[statements]
[Exit Do]
[statements]
Loop [{While | Until} condition]

參數(shù)

condition

數(shù)值字符串表達(dá)式,其值為 TrueFalse。如果 conditionNull,則 condition 被當(dāng)作 False

statements

當(dāng) conditionTrue 時(shí)被重復(fù)執(zhí)行的一條或多條命令。

說明

Exit Do 僅可以用在 Do...Loop 控制語(yǔ)句中,提供另一種退出 Do...Loop 的方法。可以在 Do...Loop 語(yǔ)句中的任何位置放置任意個(gè) Exit Do。Exit Do 通常與條件判斷語(yǔ)句(如 If...Then )一起使用,將控制傳遞給緊隨在 Loop 語(yǔ)句后面的語(yǔ)句。

當(dāng)用于嵌套 Do...Loop 中的時(shí)候,Exit Do 將控制傳遞給其所在循環(huán)的上一層嵌套循環(huán)。

下面例子舉例說明如何使用 Do...Loop 語(yǔ)句:

Do Until DefResp =vbNo
MyNum =Int (6 * Rnd + 1)      ' 產(chǎn)生 1  6 之間的隨機(jī)數(shù)。
 DefResp =MsgBox (MyNum & " 想要另一個(gè)數(shù)嗎?", vbYesNo)LoopDim Check, CounterCheck =True: Counter =0      ' 初始化變量。
Do            ' 外層循環(huán)。
 Do While Counter < 20      ' 內(nèi)層循環(huán)。
 Counter =Counter + 1      ' 增加計(jì)數(shù)器。
 If Counter =10 Then      ' 如果條件為 True... Check =False         ' 將標(biāo)志值設(shè)置為 False。
 Exit Do         ' 終止內(nèi)層循環(huán)。
 End If LoopLoop Until Check =False      ' 立即終止外層循環(huán)。

要求

版本 1

請(qǐng)參閱

Exit 語(yǔ)句 | For...Next 語(yǔ)句 | While...Wend 語(yǔ)句

返回首頁(yè) 田阳县| 崇信县| 南江县| 宜兰市| 北海市| 克东县| 仁寿县| 德惠市| 濮阳市| 万盛区| 东光县| 集安市| 凤台县| 沙湾县| 南皮县| 读书| 林口县| 桂平市| 惠来县| 上林县| 咸丰县| 屯昌县| 山阳县| 泽普县| 文山县| 镇平县| 全南县| 彭泽县| 宽甸| 正安县| 南漳县| 庄河市| 伊吾县| 崇阳县| 山东| 登封市| 佛学| 夏津县| 定兴县| 平江县| 镇安县|