“vb”中“do”、“until”、“l(fā)oop”的用法是什么？

Do循環(huán)由Do和Loop構(gòu)成,但如果只有Do和Loop的話將不停地執(zhí)行Do和Loop之間的語(yǔ)句塊,所以需要使用可選的關(guān)鍵字While或Until以及Eixt Do來(lái)指定循環(huán)的條件以及退出循環(huán).\x0d\x0a關(guān)鍵字While是指當(dāng)條件為T(mén)rue時(shí)執(zhí)行循環(huán),而Until則是在條件變?yōu)門(mén)rue之前重復(fù),就你的例子來(lái)說(shuō),用關(guān)鍵字Until給出了X=-1這個(gè)條件,意思就是在X=-1這個(gè)條件不成立的時(shí)候循環(huán)一直重復(fù)執(zhí)行,直到X=-1這個(gè)條件成立了,則結(jié)束循環(huán).\x0d\x0a下面是詳細(xì)的例句解析:\x0d\x0aDo循環(huán)在使用關(guān)鍵字While或Until的時(shí)候有兩種寫(xiě)法,一種是放在開(kāi)頭,一種是放在結(jié)尾,而Eixt Do則是插在循環(huán)體內(nèi)語(yǔ)句塊的任何地方,,用來(lái)在需要的時(shí)候退出循環(huán).\x0d\x0a關(guān)鍵字While或Until的兩種寫(xiě)法見(jiàn)如下格式:\x0d\x0a[第一種]\x0d\x0aDo While(或Until) 條件 '關(guān)鍵字和條件放在開(kāi)頭\x0d\x0a語(yǔ)句塊\x0d\x0aLoop\x0d\x0a這種格式是用關(guān)鍵字While指定的條件為T(mén)rue時(shí)執(zhí)行循環(huán),或用Until在指定的條件變?yōu)門(mén)rue之前重復(fù)執(zhí)行循環(huán).\x0d\x0a[第二種]\x0d\x0aDo\x0d\x0a語(yǔ)句塊\x0d\x0aLoop While(或Until) 條件 '關(guān)鍵字和條件放在結(jié)尾\x0d\x0a這種格式是不管條件是否成立,都先執(zhí)行一次循環(huán),然后再判斷條件來(lái)決定是否繼續(xù)循環(huán).\x0d\x0aDo\x0d\x0a If (a * i ^ 2 + b * i + c) * (a * m ^ 2 + b * m + c) 0 Then\x0d\x0a i = m\x0d\x0a End If\x0d\x0aLoop Until Abs(i - s)

創(chuàng)新互聯(lián)公司堅(jiān)持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：網(wǎng)站制作、成都網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時(shí)代的湯陰網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

回答于?2022-12-11

vb.net do循環(huán)

你確信只循環(huán)一次嗎？我看不像，在最后添加上一句msgbox jishu1，多半顯示3。

是在第二塊代碼中有問(wèn)題，你應(yīng)該把chaxun4 = xlsheet.Range("l1").Value + 2分別放到兩個(gè)條件句中初始chaxun4變量。

因?yàn)樯弦粋€(gè)Do Until atmbianhaop = xlsheet.Range("B" chaxun4).Value 循環(huán)退出后，下一個(gè)循環(huán)一開(kāi)始就符合退出條件了，所以循環(huán)沒(méi)有進(jìn)行了。

VB.net Do ... Loop Until循環(huán)和Do Until ... Loop循環(huán)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim sum As Integer = 0

Dim i As Integer = 0

Do

i = i + 1

sum = sum + i

Loop Until sum 6000

MsgBox(i)

Debug.Print(sum)

End Sub

Vb.net中有多種do循環(huán)語(yǔ)句，貌似都是一樣的，為什么弄那么多？

do ... loop

do while ... loop

do until ... loop

do ... loop while

do ... loop until

各有不同作用，有的先處理再判斷，有的先判斷再處理

VB.NET 怎樣編寫(xiě)使用Do While 循環(huán)輸出1-10的階乘，我是新手請(qǐng)加上文字說(shuō)明，呵呵，謝謝各位了！

首先在窗體上畫(huà)兩個(gè)控件：TextBox1和Button1

TextBox1用來(lái)輸入需要計(jì)算那個(gè)數(shù)的階乘

雙擊Button1進(jìn)入輸入代碼，代碼如下

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Try

Dim Factorial As Integer = 1 '定義一個(gè)變量用來(lái)記錄階乘的結(jié)果

Dim count As Integer '定義一個(gè)變量用來(lái)記錄需要計(jì)算那個(gè)數(shù)的階乘

Dim i As Integer = 1 '定義一個(gè)數(shù)用來(lái)循環(huán)

count = Int(Val(Me.TextBox1.Text)) '把TextBox1的值賦值給count

Do While i = count '下面開(kāi)始計(jì)算階乘

Factorial = Factorial * i '計(jì)算階乘

i += 1 '自增1

Loop

MessageBox.Show(Int(Val(Me.TextBox1.Text)) "的階乘是：" Factorial, "完成", MessageBoxButtons.OK) '彈出計(jì)算結(jié)果

Catch ex As Exception '出錯(cuò)提示

MessageBox.Show(Err.Description, "出錯(cuò)了", MessageBoxButtons.OK, MessageBoxIcon.Error)

End Try

End Sub

VB.NET 使用Do While 循環(huán)輸出1-10的階乘

回答了，別重復(fù)提問(wèn)了

dim i%,jx#

i=1

jx=1

do while i=10

jx=jx*i

i=i+1

loop

print jx

標(biāo)題名稱(chēng)：vb.netdo循環(huán) vb語(yǔ)言do循環(huán)語(yǔ)句
轉(zhuǎn)載來(lái)源：http://chinadenli.net/article38/hjoesp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站設(shè)計(jì)、靜態(tài)網(wǎng)站、微信公眾號(hào)、商城網(wǎng)站、定制開(kāi)發(fā)、全網(wǎng)營(yíng)銷(xiāo)推廣

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)