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

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

創(chuàng)新互聯(lián)成立于2013年，先為港口等服務(wù)建站，港口等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為港口企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

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 '下面開始計(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里while的用法?

1、while用作連詞時(shí)，表示“在…(過(guò)程)中，在…期間”。常用來(lái)引導(dǎo)時(shí)間狀語(yǔ)從句，當(dāng)主句的主語(yǔ)和while所引導(dǎo)的從句的主語(yǔ)一致時(shí)。

2、while從句中的主語(yǔ)、謂語(yǔ)往往可以省去。

3、while還可引導(dǎo)讓步狀語(yǔ)從句，意思是“雖然，盡管”，含有對(duì)比意味。

4、while表示對(duì)比關(guān)系時(shí)，意思是“而，然而”。

5、when引導(dǎo)的從句作“當(dāng)…時(shí)”或“每逢…”解，從句中的動(dòng)作既可以和主句中的動(dòng)作同時(shí)發(fā)生，也可以在主句的動(dòng)作之前或之后發(fā)生。

擴(kuò)展資料

近義詞：as

讀音：英 [?z , ?z]?? 美 [?z , ?z]?

釋義：像，如同，作為。

語(yǔ)法：as用作連詞時(shí)，可以用來(lái)表示時(shí)間，譯為“正當(dāng)…的時(shí)候，隨著…，邊…邊…”，引導(dǎo)時(shí)間狀語(yǔ)從句。主句可以是主動(dòng)句，也可以是被動(dòng)句。當(dāng)兩個(gè)主語(yǔ)的動(dòng)作是同時(shí)發(fā)生的時(shí)候，主句和從句的謂語(yǔ)動(dòng)詞都可以用進(jìn)行時(shí)態(tài)或一般式，無(wú)論動(dòng)作長(zhǎng)短。

例句：

He?has?worked?as?a?diplomat?in?the?US,?Sudan?and?Saudi?Arabia

他曾任駐美國(guó)、蘇丹和沙特阿拉伯的外交官。

vb.net 中while循環(huán)與for循環(huán)有什么不同

while為條件循環(huán)，for為計(jì)數(shù)循環(huán)。一般情況下，WHILE可替代FOR，反之則不然。

本文標(biāo)題：關(guān)于vb.net中while的信息
網(wǎng)頁(yè)路徑：http://jinyejixie.com/article2/dosgoic.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供虛擬主機(jī)、服務(wù)器托管、云服務(wù)器、建站公司、電子商務(wù)、小程序開發(fā)

廣告

聲明：本網(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)