VB循環(huán)結(jié)構(gòu)實(shí)驗(yàn)報(bào)告

實(shí)驗(yàn)報(bào)告（2011—2012學(xué)年第2學(xué)期）課程名稱：計(jì)算機(jī)程序設(shè)計(jì)（VB）xxx經(jīng)濟(jì)管理學(xué)院姓名：xxx經(jīng)濟(jì)管理學(xué)院學(xué)院：會(huì)計(jì)學(xué)專業(yè)專業(yè)：會(huì)計(jì)學(xué)專業(yè)xxxxxxxx年級：2011級xxxxxxxx學(xué)號：實(shí)驗(yàn)報(bào)告2012年4月17日第9.10節(jié)綜合樓525號室進(jìn)入實(shí)驗(yàn)室時(shí)間進(jìn)入時(shí)儀器設(shè)備狀況離開實(shí)驗(yàn)室時(shí)間離開時(shí)儀器設(shè)備狀況機(jī)器號15：25正常17：10正常13實(shí)驗(yàn)項(xiàng)目名稱實(shí)驗(yàn)四循環(huán)結(jié)構(gòu)一、實(shí)驗(yàn)?zāi)康恼莆誇or語句的使用；掌握Do語句的各種形式的使用；掌握如何控制循環(huán)條件，防止死循環(huán)或不循環(huán)。二、實(shí)驗(yàn)內(nèi)容1.課本64頁，計(jì)算存款總金額。2.計(jì)算1+2+3+4+…+100之和。3.隨機(jī)產(chǎn)生3行4列的0-99之間的整數(shù)，輸出它們。4.輸出數(shù)列1,1,2,3,5,8,……的前40項(xiàng)。三、實(shí)驗(yàn)過程（步驟、命令）及結(jié)果（截圖、源程序）（一）做自選題1，計(jì)算存款總金額。(1)設(shè)置用戶界面并進(jìn)行屬性設(shè)置創(chuàng)建一個(gè)新的窗體，在窗體中加入控件并設(shè)置相應(yīng)的屬性。設(shè)置后的界面如下圖（2）設(shè)置代碼對Command1的Click（單擊）事件添加如下代碼：Privatesubcommand1_click()Dimm!,s!,n%,i%S=val(text1.text)M=val(text2.text)N=val(text3.text)ForI=1tonS=s*(1+m)NextIText4.text=str(n)+“年后可得到:”+str(s)+“元”Endsub設(shè)置后詳見下圖：運(yùn)行后在文本框中輸入“8000,0.03,5”,單擊按鈕后的界面圖如下：（二）做自行選題2,計(jì)算1+2+3+4+…+100之和。(1)設(shè)置用戶界面并進(jìn)行屬性設(shè)置創(chuàng)建一個(gè)新的窗體，在窗體中加入控件并設(shè)置相應(yīng)的屬性。設(shè)置后的界面如下圖（2）設(shè)置代碼Privatesubcommand1_click()Dims%,i%S=0ForI=1to100S=s+iNextiPrint“s=”,sEndsub設(shè)置后詳見下圖：運(yùn)行后單擊按鈕后的界面圖如下：（三）做自選題3，隨機(jī)產(chǎn)生3行4列的0-99之間的整數(shù)，輸出它們。(1)設(shè)置用戶界面并進(jìn)行屬性設(shè)置創(chuàng)建一個(gè)新的窗體，在窗體中加入控件并設(shè)置相應(yīng)的屬性。設(shè)置后的界面如下圖（2）設(shè)置代碼對Command1的Click（單擊）事件添加如下代碼：OptionBase1PrivateSubCommand1_Click()ClsFontSize=20Dima(3,4)AsInteger,i%,j%RandomizeFori=1To3Forj=1To4a(i,j)=Int(Rnd*100)Printa(i,j);NextjPrintNextiEndSub設(shè)置后詳見下圖：運(yùn)行后單擊按鈕后的界面圖如下：（四）做自選題4，輸出數(shù)列1,1,2,3,5,8,……的前40項(xiàng)。(1)設(shè)置用戶界面并進(jìn)行屬性設(shè)置創(chuàng)建一個(gè)新的窗體，在窗體中加入控件并設(shè)置相應(yīng)的屬性。設(shè)置后的界面如下圖（2）設(shè)置代碼PrivateSubCommand1_Click()ClsFontSize=20Dimf(40)AsLong,i%f(1)=1f(2)=1Fori=3To40f(i)=f(i-1)+f(i-2)NextFori=1To40PrintTab(10*((i-1)Mod4)+1);f(i);NextEndSub設(shè)置后詳見下圖：運(yùn)行后單擊按鈕后的界面圖如下：四、存在問題及解決方法存在問題：存在輸出亂碼現(xiàn)象。解決方法：與同學(xué)討論之后發(fā)現(xiàn)是text1與text2位置顛倒所致，改正后得到了正確答案。思考題解答寫出For循環(huán)語句和Do…Loop格式。For循環(huán)語句的格式：For循環(huán)控制變量=初值To終值[Step增量][<語句塊>][ExitFor][<語句塊>]Text[循環(huán)控制變量]Do...Loop循環(huán)語句格式Do[While1Until<條件表達(dá)式>][<語句塊>][ExitDo][<語句塊>]Loop2.說明step增量的作用，并說明什么情況下可以省略此項(xiàng)。用來指