


| Phát biểu lặp Do...Loop |
Phát biểu lặp Do...LoopCú pháp Dạng 1:Do While condition ‘Lặp trong khi [statements] [Exit Do] Loop Do Until condition ‘Lặp cho đến khi [statements] [Exit Do] Loop Cú pháp Dạng 2: Do [statements] [Exit Do] [statement] Loop {While/Until} condition + while: vòng lặp được thực hiện cho đến khi condition có giá trị False + until: vòng lặp được thực hiện cho đến khi condition có giá trị True + Exit Do: cho phép thoát khỏi vòng lặp Do...Loop Ví dụ: Phát biểu Do...Loop Dim Check As Boolean=True Dim Counter As Integer=0 ' Vòng lặp ngoài với biến Check Do Do while Counter<20 ' Vòng lặp trong biến Counter Counter+=1 If Counter=10 then Check=False Exit Do ' Thoát khỏi vòng lặp trong End if Loop ' Kết thúc vòng Do...Loop ngoài với biến Counter Loop Until Check=False ' Kết thúc vòng Do...Loop ngoài với biến Check |
| < Trước | Tiếp > |
|---|