vb中的dowhileloop語句

2021-08-04 20:25:53 字數 6261 閱讀 5316

1樓:文件類共創空間

do loop 語句的語法具有以下幾個部分:

在do…loop 中可以在任何位置放置任意個數的 exit do 語句,隨時跳出do...loop 迴圈。exit do 通常用於條件判斷之後,例如if then,在這種情況下,exit do 語句將控制權轉移到緊接在 loop 命令之後的語句。

如果 exit do 使用在巢狀的do…loop 語句中,則 exit do 會將控制權轉移到 exit do 所在位置的外層迴圈。

2樓:鄧佩蘭懷莞

do...loop分2種

1.do

while

《條件》

...loop

2.do

...loop

until《條件》

第一種是先判斷條件,如符合再執行,直到條件不符合退出迴圈,有可能成為死迴圈,也有可能一次也不執行

第二種是先執行,再判斷條件,若條件不符合,就不再執行第二次,所以這種迴圈最少要執行一次

3樓:

dim a, b, s, i as integer '定義變數a = val(text1.text) '把text1由字串轉成數值後賦值給變數a

b = val(text2.text) '同上s = 0 's的值歸零

i = a '把a的值賦值給變數i

do while i <= b '當i<=b的時候做迴圈s = s + i '把i的值累加到s上i = i + 1 'i增加1

loop '迴圈結尾

msgbox "計算結果為:" & s '用對話方塊輸出計算結果send sub '結束

4樓:士芮安

a = val(text1.text)

b = val(text2.text)

在文字框裡填入兩個數字

求和a到b所有的數加起來.

5樓:匿名使用者

private sub command1_click()dim a, b, s, i as integera = val(text1.text) '得到文字框1的文字並轉換成數值

b = val(text2.text) '得到文字框2的文字並轉換成數值

s = 0 's的值歸零i = a

do while i <= b '當i小於等於b時s = s + i '累加i = i + 1

loop

msgbox "計算結果為:" & s

end sub

'就是說從輸入兩個數字,從數字1一直累加到數字2

6樓:匿名使用者

輸入兩個整數

求從第一個整數到第二個整數累加和

vb 語言中do loop while迴圈語句如何使用?

7樓:匿名使用者

do《迴圈體語句》

loop while 《條件判斷》

......

特點:因為一開始,直接進入迴圈,執行《迴圈體語句》後,才會去執行《條件判斷》,所以這種迴圈語句,至少會執行一次迴圈。

如果《布林表示式》的值為true,就從do開始,繼續執行迴圈;

如果《布林表示式》的值為false,就迴圈結束,執行loop while 《條件判斷》下面的語句。

例如:i = 1

doprint i

i = i + 1

loop while i <= 3

這裡,《條件判斷》就是i <= 3;

初始i = 1,進入do迴圈

第1次迴圈;

執行 print i,輸出 1

執行 i = i + 1,i 等於2

執行 loop while i <= 3,因為此時i = 2,i <= 3的結果為true,繼續迴圈,執行do 。

第2次迴圈;

執行 print i,輸出 2

執行 i = i + 1,i 等於3

執行 loop while i <= 3,因為此時i = 3,i <= 3的結果為true,繼續迴圈,執行do 。

第3次迴圈;

執行 print i,輸出 3

執行 i = i + 1,i 等於4

執行 loop while i <= 3,因為此時i = 2,i <= 3的結果為false,迴圈結束 。

vb中關於: for ...to,和do while....loop語句的用法

8樓:表亭晚頻醜

dima,

b,s,ias

integer

'定義變數a=

val(text1.text)

'把text1由字串轉成數值後賦值給變數ab=val(text2.text)

'同上s=0

's的值歸零i=

a'把a的值賦值給變數i

dowhile

i<=b'當i<=b的時候做迴圈s=

s+i'把i的值累加到s上i=

i+1'i增加1

loop

'迴圈結尾

msgbox

"計算結果為:"&s

'用對話方塊輸出計算結果s

endsub'結束

9樓:

for ...to,用在知道迴圈次數的時候比較方便do while....loop 用在在迴圈時判斷條件,條件滿足執行,不滿足就退出

例如你要計算1+2+3+...+100的值則用for to要計算1+2+3+4+5+...什麼時候大於1000,並返回最後一個數時用do while....loop

10樓:匿名使用者

求:1+2+……+10的和

for i=1 to 10

sum=sum+i

next

同樣求:1+2+……+10的和

i=1do while i<=10

sum=sum+i

i=i+1

loop

vb do loop 語句

11樓:問明

vb do迴圈語句的幾種形式

do迴圈語句的幾種形式:

1、do while i>1     '條件為true時執行... ...  '要執行的語句loop

2、do until i>1     '條件為false時執行... ...  '要執行的語句loop

3、do

... ...  '要執行的語句

loop while i>1   '條件為true時執行4、do

... ...  '要執行的語句

loop until i>1   '條件為false時執行5、while...wend 語句

while i>1        '條件為true時執行... ...  '要執行的語句wend

do while loop 使用do

loop就是一直迴圈

dox=x+1

loop

那麼就是個死迴圈 一直迴圈

所以要用while 設定個條件 當滿足條件才迴圈do while x<100

x=x+1

loop

那麼就是當x<100 的時候就一直迴圈。

while迴圈

while迴圈和for迴圈類似,其格式為:

while (條件語句)

語句1 ;

語句2 ;

語句n ;

執行while時,先測試“條件語句”,如果條件成立,則執行語句1到語句n,直至條件不成立時調處迴圈。

int i=0 ;

while (i<10)

i++ ;

system.out.println("hey!.get me out of here!:);

3:do ... while 迴圈

do ... while 迴圈語句的格式為:

do 語句1 ;

語句2 ;

語句n ;

while (條件語句) ;

do ...while 語句的功能是首先執行語句1到語句n,然後進行條件測試,如果條件成立,則繼續執行語句1到語句n,否這跳出迴圈。如:

boolean test=false;

do while(test);

使用時注意結尾處while語句後的分號。

12樓:文件類共創空間

do loop 語句的語法具有以下幾個部分:

在do…loop 中可以在任何位置放置任意個數的 exit do 語句,隨時跳出do...loop 迴圈。exit do 通常用於條件判斷之後,例如if then,在這種情況下,exit do 語句將控制權轉移到緊接在 loop 命令之後的語句。

如果 exit do 使用在巢狀的do…loop 語句中,則 exit do 會將控制權轉移到 exit do 所在位置的外層迴圈。

13樓:閃星

希望可以幫到你,滿意請採納,有問題請追問^_^

14樓:匿名使用者

do...loop 語句

當條件為 true 時,或直到條件變為 true 時,重複執行一個語句塊中的命令。

語法do [ condition]

[statements]

[exit do]

[statements]

loop

do...loop 語句示例

本示例示範如何使用 do...loop 語句。內層的 do...

loop 語句迴圈到第 10 次時將標誌值設定為 false,並用 exit do 語句強制退出內層迴圈。外層迴圈則在檢查到標誌值為 false 時,馬上退出。

dim check, counter

check = true: counter = 0 ' 設定變數初始值。

do ' 外層迴圈。

do while counter < 20 ' 內層迴圈。

counter = counter + 1 ' 計數器加一。

if counter = 10 then ' 如果條件成立。

check = false ' 將標誌值設成 false。

exit do ' 退出內層迴圈。

end if

loop

loop until check = false ' 退出外層迴圈。

15樓:匿名使用者

private sub form_load()me.show

do i = i + 1

print i

if i = 10 then exit doloop

end sub

16樓:

告訴你個最簡單的方法!

do...

if (退出迴圈條件) then

exit do

end if

...loop

vb中的do...loop語句怎麼使用?

17樓:匿名使用者

do...loop 語句

當條件為 true 時,或直到條件變為 true 時,重複執行一個語句塊中的命令。

語法do [ condition]

[statements]

[exit do]

[statements]

loop

do...loop 語句示例

本示例示範如何使用 do...loop 語句。內層的 do...

loop 語句迴圈到第 10 次時將標誌值設定為 false,並用 exit do 語句強制退出內層迴圈。外層迴圈則在檢查到標誌值為 false 時,馬上退出。

dim check, counter

check = true: counter = 0 ' 設定變數初始值。

do ' 外層迴圈。

do while counter < 20 ' 內層迴圈。

counter = counter + 1 ' 計數器加一。

if counter = 10 then ' 如果條件成立。

check = false ' 將標誌值設成 false。

exit do ' 退出內層迴圈。

end if

loop

loop until check = false ' 退出外層迴圈。

VB中ListIndex的作用,vb中ListIndex屬性如何利用

表示式 list list1.listindex 返回當前選擇專案的字串。列表中的第一項是 listindex 0,listcount 始終比最大的 listindex 值大 1。對於可內以做多重選擇容的控制項,該屬性的行為取決於所選擇專案的個數。如果只選擇了乙個專案,listindex 返回該項目...

vb中msgbox的問題,VB程式設計中MsgBox怎麼用

a msgbox 必須在工資審批任務完成後才能進行更新記錄操作!請選擇是否進行更新記錄操作 vbyesno,確定更新 少了乙個逗號吧,vbyesno前面加個逗號看看看其他是沒錯的 因為你點了確定按鈕這時x才會有值呀 又因為vbokonly 1所以x 1 msgbox返回的是你按的那個按鈕 而按鈕vb...

vb模組中的過程如何呼叫,VB 模組中的過程如何呼叫?

舉乙個比較直觀的例子 你在模組1中寫好以後函式 public function 直角三角形斜邊 byval 直角邊1 as double,byval 直角邊2 as double 直角三角形斜邊 sqr 直角邊1 2 直角邊2 2 end function 在你要呼叫函式的地方寫上 dim 斜邊 a...