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



Do...Loop 語句

當條件為 True 時或條件變?yōu)?True 之前重復執(zhí)行某語句塊。

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

也可以使用下面的語法:

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

參數(shù)

condition

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

statements

conditionTrue 時被重復執(zhí)行的一條或多條命令。

說明

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

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

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

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

要求

版本 1

請參閱

Exit 語句 | For...Next 語句 | While...Wend 語句

返回首頁 苏尼特右旗| 丰顺县| 绥棱县| 塘沽区| 仙桃市| 化隆| 定陶县| 名山县| 苗栗县| 滁州市| 卫辉市| 玉溪市| 晴隆县| 陆河县| 江门市| 眉山市| 黔江区| 崇左市| 武平县| 德清县| 巨鹿县| 长宁县| 兴业县| 靖宇县| 泊头市| 崇州市| 洛宁县| 南开区| 灵宝市| 昌平区| 伊川县| 哈密市| 宁波市| 山阳县| 阿巴嘎旗| 遵化市| 西峡县| 白沙| 六枝特区| 阿拉善盟| 光山县|