《VB循环结构复习学案》由会员分享，可在线阅读，更多相关《VB循环结构复习学案（7页珍藏版）》请在金锄头文库上搜索。
1、信息技术复习课学案主题：循环结构一、考点点击：1、学会使用循环结构设计程序的基本方法。二、学习目标：1、掌握 for 循环语句、 do loop 循环语句的格式及执行流程2、学会用循环控制结构来解决实际问题三、活动形式在教师引导下的自主学习四、考点注解：学会使用循环结构设计程序的基本方法。按条件重复执行一种操作的结构称为循环结构。 循环结构有两种形式， 即当型循环结构和直到型循环结构。（ 1 ）当型循环结构：先进行判断，然后根据判断结果（真或假）再决定是否执行循环体的循环结构称为当型循环结构，如左图所示。（ 2 ）直到型循环结构：先执行一次循环体，然后再根据判断结果（真或假）决定是否继续执行循
2、环体的循环结构称为直到型循环结构，如下图所示。从上述两种循环结构的流程图可以看出， 对于当型循环结构， 程序有可能一次也不执行循环体；对于直到型循环结构，程序至少要执行一次循环体。循环语句实现循环结构。 VB 中循环语句有两种： DoLoop 语句和 ForNext 语句。 DoLoop 语句是条件型循环，当循环的执行是由条件控制，在循环的次数不确定时通常选用该语句； For 语句是计数循环，在循环次数已知时选用该语句。（一）、 do loop 循环- 1 -信息技术复习课学案先计算条件表达式的值，当其值为 True 时，执行循环体中的语句序列，然后再重新计算条件表达式的值，当条件表达式的值为
3、 False 时，循环终止，执行 Loop 语句后的语句。先计算条件表达式的值，当其值为False 时，执行循环体中的语句序列，然后再重新计算条件表达式的值，直到条件表达式的值为True 时，循环终止，执行DoUntil Loop语句的下一条语句。先 执 行循环语句，再判断条件表达式的值，当条件条件表达式的值为 True时继续执行循环体，当条件表达式的值为alse结束循环，转而执行 Loop While 后 面的语句先 执 行循环语句，再判断条件表达式的值，当条件条件表达式的 值 为False时 继续执行循环体，直到条件为 True 结束循环转而执 行 LoopUntil后 面的语句。（二）
4、ForNext 语句在循环次数已知的情况下，采用ForNext 语句实现循环结构是比较合适的选择。ForNext 语句的格式如下：- 2 -信息技术复习课学案（三）、循环结构例题对比求 1+2+3+ +100 的值1、当 for语句中省略step 时默认值是12、在 do loop循环中要注意变量初值的设置和循环变量的增值问题- 3 -信息技术复习课学案五、习题训练：1 .单选题 1分 在 VB中，某同学要计算1+3+5+ +9 的值，他应用循环结构语句如下：s=0 FOR i 1 TO 9 STEP s=s+i请问语句中的“”代表的值是（）A、-1B、-2C、2D、12.多选题 2分 如下
5、VisualBasic程序段，用到了哪些控制结构（）。PrivateSub command1_click()S=0i=16DoS=S+Ii=i+1UntilS=100Printi的值为 :;I EndSubA、顺序结构B、循环结构C、层次结构D、选择结构3. 单选题 1分 .以下是一段VisualBasic程序，它的基本结构属于 （）Do S=S+I i=i+1Loop Until S=100A、顺序结构B 、选择结构C、循环结构D 、树型结构4. 单选题 1分 执行下列VB程序段后，变量j 的值为（）- 4 -信息技术复习课学案S=0 For j=1 to 10 Step 2 S=S+j N
6、ext jA、1 B 、10 C 、11 D 、125. 单选题 1分 有如下 VB程序段，对该程序段执行过程描述正确的是（）Do S=S+1 Loop Until S100A、如果 S100，则退出循环B、如果 S100，则重复执行S=S+1D、不论 S 初值为多少，至少执行一次S=S+16. 单选题 1 分 在结构化程序设计中通常包含三种不同的控制结构，即：顺序结构、选择结构、循环结构。下列说法正确的是（）A、一个程序只能包含一种结构B、一个程序最多可以包含两种结构C、一个程序可以包含以上三种结构D、一个程序必须包含以上三种结构7. 单选题 1分 求解 S=2+4+6+8+10的 VB程序
7、如下，试问程序中的“step ”表示（）。S=0 For i=2 to 10 step 2S=s+I Next iA、函数B、步长C 、表达式D、变量8. 阅读下列程序段，程序运行后在文本框中显示的结果是Private Sub Form_Click()Dim s As IntegerDim i As Integers = 0For i = 1 To 100s = s + iNext i= s End SubA 、 5051B、 5050 C、10101 D、 101009. 执行以下语句后， a 的值是Dim a As Integera = 1Do While a 100a = a + 2Lo
8、opA 、101B、溢出C、 99D、10010. 补充完善下列程序段求 s=2+4+6+ +100 之和。Dim i As IntegerDim s As Integers=0For i=2 To 100 Step 2s=_Next iPrint s输出 100 以内（包含100）能被 3 整除的数。Dim I As IntegerI=1Do- 5 -信息技术复习课学案IfIMod 3=0 ThenPrint IEnd IfI=I+1Loop Until _Function func()Dim i As IntegerDim s As Integers = 0For i = 10 To 10
9、0 Step 10s = _Next ifunc = s= & sEnd Function算法描述 某学校组织一次读书活动，计划购买各种各样书写笔作为奖品。 用 100 元买 100 支笔，其中钢笔每支5 元，圆珠笔每支1 元，铅笔 1 元买 6 支， 求可行的方案数有多少种 注：请不要更改原程序结构，删除（1）、（ 2）、（3），并在对应位置填写正确的代码Function func()Dim i, j, k As Integer i,j,k 变量分别存储购买三种笔所用的总金额 func = (1)For i = 0 To 100For j = 0 To 100For k = 0 To 100
10、If (i + j + k) = 100 (2) (i / 5 + j + 6 * k) = 100 Thenfunc = func + 1End IfNext kNext (3)Next iEnd FunctionPrivate Sub Command1_Click()Dim sumsum = (1)For i = 1 To 6k = 2 i- 6 -信息技术复习课学案sum = (2) + kNext= sumout (sum)End SubPrivate Sub Command1_Click()s = 1For i = 1 To 10s = s * (1)Nextfunc = s= funcout (func) End SubPrivate Sub Command1_Click()s = 0For
