基礎(chǔ)vb循環(huán)計算

學案23循環(huán)語句1．掌握DO語句的基本格式2.掌握FOR語句的基本格式3.能夠通過簡單循環(huán)語句程序代碼，計算出程序運行的結(jié)果4.在程序設(shè)計過程中能熟練應(yīng)用DO語句與FOR語句解決簡單問題重點：掌握DO語句與FOR語句基本格式及其區(qū)別難點：在程序設(shè)計過程中能熟練應(yīng)用DO語句與FOR語句解決問題目標定位1自學導(dǎo)引2循環(huán)語句的功能是實現(xiàn)程序中的語句的重復(fù)。VB中循環(huán)語句主要有For語句和Do語句兩種。1．For語句的基本格式For循環(huán)變量＝初值

To終值

Step步長循環(huán)體Next循環(huán)變量For后面的循環(huán)變量在初值到終值之間每取得一個合理值，就執(zhí)行一次循環(huán)體，直到循環(huán)變量的取值超出初值與終值之間的范圍。當步長為1的時候

Step1可以省略，步長可以是正數(shù)，也可以是負數(shù)，但是不能為0或者小數(shù)。當步長為負數(shù)的時候，初值必須大于終值。32．Do語句的基本格式DoWhile條件表達式循環(huán)體LoopDowhile后面的條件表達式結(jié)果為True的時候，就執(zhí)行一次循環(huán)體，直到條件表達式的結(jié)果為False，跳出循環(huán)。4實例點撥5

有如下程序段：x＝1for

y＝1to5step2x＝x*ynext

y該程序執(zhí)行后，變量x的值是______________，y的值是______________。答案：15

76解析：本題考查的是循環(huán)結(jié)構(gòu)程序運行后，相關(guān)變量的值。For后面的循環(huán)變量每取得一個合法的值，循環(huán)體就執(zhí)行一次。因此，程序運行過程中x、y的值如下表：第幾次循環(huán)y的取值x的取值11x＝1*1=123x＝1*3=335x＝3*5=1547結(jié)束循環(huán)7

有VisualBasic程序段如下：x＝－3DoWhilex<0x＝x＋

2Loop該程序段運行后，變量x的值是(

)A．－3

B．－1

C．1

D．3答案：C8解析：x的初值為－3，所以關(guān)系表達式x<0結(jié)果為True，執(zhí)行循環(huán)體x＝x＋

2，x的值變?yōu)椋?。x的為－1，關(guān)系表達式x<0結(jié)果為True，執(zhí)行循環(huán)體x＝x＋

2，x的值變?yōu)?。x的值為1時，關(guān)系表達式x<0結(jié)果為False，循環(huán)結(jié)束。所以本題答案為C。93．下列VB程序運行時，單擊命令按鈕Command1后，文本框Text1中顯示的內(nèi)容是______________，文本框Text2中顯示的內(nèi)容是______________。PrivateSubCommand1_Click(

)Dima(1To5)AsLong,iAsIntegera(1)＝1Fori＝2To5a(i)＝a(i

－

1)*iNextiText1.Text＝Str(a(2))Text2.Text＝Str(a(5))EndSub10答案：2

120解析：a(1)＝1，當i＝2的時候

a(2)＝a(1)*2＝2；當i＝3的時候

a(3)＝a(2)*3＝2*3=6;當i=4的時候a(4)=a(3)*4=6*4=24;當i=5的時候a(5)=a(4)*5=24*5=120;當i=6的時候超出初值與終值的范圍,循環(huán)結(jié)束，本題Txet1.Text=Str(a(2)),Text1中顯示的是a(2)的值2,Text2.Text=Str(a(5)),Text1中顯示的是a(5)的值120。11自學檢測121．如圖所示循環(huán)結(jié)構(gòu)的算法，回答以下問題：(1)循環(huán)變量?？刂蒲h(huán)的變量是_______，其變化范圍________，每次變化的增量是________。(2)循環(huán)體。循環(huán)體語句是______________，該語句的功能是_____________________，重復(fù)執(zhí)行的次數(shù)為_________。(3)該算法的功能是__________________________________。

k

[5,100]

5

s＝s＋k

將s＋k的結(jié)果賦值給s

20

求s＝5＋10＋15＋……＋100的和

132．有如下visualbasic程序段：

s＝1i＝10Dowhilei>＝1s＝s*i*(i－1)__①__loop若要使語句s＝s*i*(i－1)執(zhí)行5次，則①

處空格內(nèi)應(yīng)填寫的語句是(

)A．s＝s＋2

B．s＝s－2C．i＝i＋2

D．i＝i－2D

143．有如下VisualBasic程序段：Forx＝10To1Step－1

a(x)＝x＋

1Nextx該程序段運行后數(shù)組元素a(3)的值為(

)A．9 B．8 C．4 D．34．下列語句是用于計算sum＝1＋3＋5＋7＋……

＋99的VisualBasic語句：①

s＝s＋i

②

nexti

③

s＝0

④

fori＝1to99step2正確的語句序列是(

)A．③④①②

B．①④③②

C．④③①②

D．③④②①

C

A

155．以下visualbasic程序段：

s＝0Fori＝1to10step3s＝s＋i*iNexti該程序段執(zhí)行完后，變量i的值為(

)A．1

B．10

C．11

D．13D

166．分析以下visualbasic程序段的功能k＝a(1)fori＝2to10ifa(i)<kthenk＝a(i)nextitext1.text＝str(k)(1)分析循環(huán)變量。該程序段中，循環(huán)變量是_______，其變化范圍是______，步長是________，因此循環(huán)體執(zhí)行次數(shù)為__________。i

[2,10]

1

9

17(2)分析循環(huán)體的功能，該程序段中，循環(huán)體語句是____________________。(3)如果數(shù)組元素a(1)到a(10)的值依次是：88、22、45、36、17、46、31、23、55、12，該程序運行后text1輸出的結(jié)果是____________________。

ifa(i)<kthenk＝a(i)

12

187．有如下VB程序段：

Dima(lTo5)AsInteger,iAsInteger,cAsInteger

a(l)＝2:a(2)＝1:a(3)＝3:a(4)＝4:a(5)＝5

c＝0

Fori＝3To5Ifa(i

－

2)＋

a(i

－

1)＝a(i)Thenc＝c＋

1

NextiTextl.Text＝Str(c)該程序段運行后，文本框Textl中顯示的內(nèi)容是(

)A．1

B．2

C．3

D．4B

198．有如下程序段：DimkAsInteger，sAsIntegerk＝0；s＝0DoWhilek＞＝10k＝k＋1s＝s＋kLoop該程序段執(zhí)行后，變量s的值是(

)A．0

B．1

C．10

D．11A

209．運行如下VisualBasic程序，單擊命令按鈕Command1，出現(xiàn)如圖所示的出錯信息。發(fā)生“下標越界”錯誤時所執(zhí)行的語句是(

)PrivateSubCommand1_Click(

)

Dima(0To5)AsInteger

DimiAsInteger′①