课题：程序的基本结构——循环结构之For-Next语句第课时课型：新授备课教师授课时间
教学目标
知识与技能
1、了解循环的概念，理解循环结构的基本思想
2、掌握For-Next语句的基本结构的写法循环变量，初值，终值和步长。
3、理解For-Next语句的执行过程
过程与方法
1.通过分析问题，能准确找出循环变量、确定循环结束条件。
2.能利用For-Next语句解决简单的问题。
情感态度与价值观
1.通过编写循环结构的程序，体会循环结构的执行过程。
2.通过利用循环思想解决问题，体会循环思想的重要性。
教学重点1、理解循环结构的基本思想
2、理解For-Next语句的执行过程
教学难点根据需要采用循环结构解决实际问题，并提炼出for语句的基本结构学生理解For-Next语句的执行过程
教学
准备
几个以For-Next语句组成的不同功能的程序
教学过程设计教学
内容师生教学活动设计
备注栏
（学生笔记栏）
一、设疑导入
同学们，请先看这个图形(在窗体左边输出显示
竖行排列的1，2，3，4，5)，如果用以前学过的程
序设计语言怎样来编写它的程序呢？
生（稍做思考，然后回答)：使用Print语句
P rint“1”
Print“2”
Print“3”
Print“4”
Print“5”
师：同学们做得很好，，如果想要显示1-10，或是1-100的数字呢？怎么做，难道就这样顺序写下去吗？这样编写是不是太繁琐了。如果能让计算机去完成这部分重复的内容，而我们只要告诉计算机重复操作的次数就可以了，这个愿望能否实现呢？
通过我们今天学习的FOR—NEXT循环语句，就可以很容易的实现这个想法。
二、探索新知
直接在vb 中修改刚才的程序，并通过流程图和表格详细讲解该程序的循环执行过程，让学生了解初值，终值,步长和循环体语句的变化。
程序代码：
Private Sub cmd_start_Click()
Dim i As Integer ‘定义变量i 为整型
For i = 1 To 5 Step 1 ‘设置循环变量，起始为1，终止到5，步长为1 Print i ‘打印变量值 Next i End Sub
师：循环结构也称重复结构，它的作用是使一段程序能重复执行，被重复执行的部分称为循环体。但重复一般都是有条件的，即在满足FOR 语句中的条件下才执行循环体，否则退出循环体。现在我们一起利用表格更直观的观察循环的执行过程。
循环次数
变量i 循环体内语句
1 1 打印i 的值
2 2
3 3
4 4 5
i=i+1
【探索·实践】
请大家自己根据前面所学，总结FOR/NEXT 语句的语句格式：并与小组其他成员讨论程序的执行过程
For <循环变量>= <初值> To <终值> [step <步长>]
<循环体>
Next <循环变量>
【知识点拨】
1) 步长值可以为正数或者负数，当步长为1时，STEP 1可省略不写；
2)循环体语句中可以含有任意多条语句，也可无任何语句，称为空循环；
3) 循环体语句可以含有循环结构；
4) For—Next必须成对出现
5）有时需中途退出循环，这时用EXIT FOR命令。
三、排疑·解错
1、在VB窗体显示输出1到10这十个数字。
分析此循环语句中，循环变量是（）
初值是（）终值是（）步长是
（）循环体中的语句是（），
请尝试写出运行结果
（）。
(提示，直接在VB中验证答案)
2、小组内任意抽取1个程序讨论，分析对错，并说明错误原因
四、实践探究（任选一任务程序完成，）备注一：加粗显示为错误原因，学案端不显示答案。
1、打印1~5这5个数Dim i As Integer
For i = 1 To 5 Step -1 Print i
Next i
End Sub
[步长应为1] 2、打印5~1这5个数
Dim n As Integer
For n=5 to 1
Print n
Next i
[步长为－1，不能省，应for
n=5 to 1 step?1]
3打印1~5这5个数
Dim n As Integer
For n=1 to 5
Print “n”
Next n
[n加上引号，就变成了字符
串，应把引号去掉]
5)打印1~5这5个数
Cls
Dim n As Integer
For n=1 to 5
Print n
[FOR与NEXT必须成对出现，不能缺省]
6)打印1~5这5个数
Cls
Dim n As Integer
For 1 to 5
Print n
Next
[循环变量n要赋值，for n=1 to 5]
1、分析下列程序，说出程序功能，交尝试在表格中写出循环变量的值及程序的变化过程。
Dim x As Integer s=0
For i=1 to 100 s=s+i Next i print s
功能：求1到100的累加和 2、分析下列程序，说出程序功能 Cls
Dim i As Integer for i=20 to 10 step-2 print i next i
功能：输入出20,18,16,14,12,10六个数 3、编程，竖排输出1~10的偶数 4、编程，求100以内的奇数 5、编程，s=1*3*5*......*101
五、拓展提高
通过分析老师给出的提示代码，尝试将下面程序补充完整,思考如何通过循环内嵌套循
环来完成一些复杂的程序设计？
六、自我检测 ，这节课我学会了什么？
课 后 反 思
课间游戏要安全，上下楼梯不打闹。
循环次数
变量i 求和表达式 值(s) 1 1 s=s+1 1 2 s=s+2 3 3 s=s+3
i=i+1
s=s+i
VB条件语句和循环语句 测试习题(满分100分) 班级姓名 一、根据程序写运行结果 1．写出下列程序的运行结果。(5分) Private sub command1_click X=VAL(text1.text) IF X<0 THEN Y=ABS(X) ELSE Y= -X END IF PRINT "Y=";Y End sub 运行结果： (1)在text1中输入99 输出 (2)在text1中输入-23 输出 2. 写出下列程序的运行结果。(5分) Private sub command1_click N=1 FOR X=3 TO 10 STEP 3 N=N*2 NEXT X PRINT "N=";N End sub 运行结果： 3．写出下列程序的运行结果。(5分) Private sub command1_click S=0 FOR X=10 TO 1 STEP 4 S=S+X NEXT X PRINT " S=";S End sub(5分) 运行结果： 4.写出下列程序运行结果。 (5分) Private sub command1_click FOR I= 1 TO 5 step 2 PRINT I， NEXT I End sub 运行结果： 5. 写出下列程序的运行结果。(5分) Private sub command1_click X=VAL(text1.text) IF X/2=Int(X/2) THEN S=X+1 ELSE S=X-1 END IF PRINT "S=";S End sub 若在text1中输入以下数字，运行结果： (1)99 (2)98 二、根据题意，完善下列程序。(每空5分) 1.请设计一个程序，将从键盘上任意输入的两个数中最大的那个选出来。 Private sub command1_click A=VAL(text1.text) B=VAL(text2.text) IF A>B THEN MAX=________ ELSE MAX= ENDIF PRINT "MAX="；MAX End sub 2.求和S=1+3+5+7+…+99 Private sub command1_click S=0 FOR I=1 TO 99 STEP S=________ NEXT I PRINT “S=”；S End sub 3.完善下列程序，使其能求出 2+4+6+……+100之和。 Private sub command1_click FOR I =____ TO 100 STEP _____ S= S+I ______ I PRINT S End sub
vb三种基本结构练习题 1、计算圆的面积（顺序结构） dim r,s,c as single r=inputbox("输入r的值") s=3.14*r*r c=2*3.14*r print s print c 2、小明去买电池，2.5元一节，买电池超过10节，超出的部分按八折出售。输入小明买电池的数量，输出小明应付的钱数。（选择语句） dim a as integer dim q as single a=inputbox("输入小明买的电池数") if a>10 then b=25+(a-10)*2.5*0.8 else b=a*2.5 end if print b 3、求1+2+3+4+……+100的和。（循环语句） dim i,sum as integer for i=1 to 100 sum=sum+i next i print sum 4、输入数字n，求n！（n!=1*2*3*……*n）（循环语句） dim i,sum,n as long n=inputbox("输入n的值") sum=1 for i=1 to n sum=sum*i next i print sum
1、在窗体上任意位置画一个文本框和一个命令按钮，编写程序，当用户单击命令按钮时，文本框移动到窗体的左上角，并且文本框的大小是原来的2倍。 2、在窗体上任意位置画一个文本框和一个命令按钮，设置窗体的标题属性为“信息窗口”；命令按钮的标题属性为“确定”。编写程序，当用户单击命令按钮时，在文本框中显示“包头师范学院”，要求字体为隶书、加粗、加下划线、字号为20、颜色为红色。 3、在窗体上任意位置画两个命令按钮，分别设置它们的标题属性为：加载图片、显示信息。编写程序，当用户单击第一个命令按钮时，在窗体上加载一幅图片（图片自定）。当用户单击第二个命令按钮时，在窗体上打印信息“包头师范学院“。 4、例1: 在窗体上部设置一个文本框，文本框的下面设置 3 个命令按钮，其中左边按钮中标有“单击此按钮”，中间按钮中标有“清除”，右边按钮中标有“程序结束”。当程序运行时，用鼠标单击左边按钮时，屏幕上部的文本框中显示“欢迎使用vb 6.0”;如果单击中间按钮，则清除文本框中显示的内容；而如果单击右边的按钮，则结束程序。 5、例2 请根据题目要求，设计VB应用程序： 1、在窗体的上方并排分别创建一个标签控件label1和一个文本框控件 text1； 要求：①窗体的标题命名为“个人简介”、窗体背景颜色为黄色。 ②标签和文本框中显示的字体为隶书、样式为斜体、字体大小为三号的红色字。 2、在两个控件的下方并排创建两个命令按钮控件command1、command2，分别命名为：“姓名”、“单位”。 3、请编写事件过程代码，使得程序运行时，当鼠标按下“姓名”按钮时，将在标签中显示你的名字；当鼠标按下“单位”按钮时，将在文本框中显示你现在所在的系、级、班。 4、完成以上操作后以V1为窗体名保存在D盘自己的文件夹下 上机练习三 1、在窗体上画一个文本框控件，要求运行时在文本框中显示信息“包头师范学院”（form-load事件）。当用户在文本框中选中任意数量的字符时，在窗体上显示所选中的字符数、选中字符数的首字符数及选中的字符内容。 2、在窗体上画两个文本框控件，先在属性窗口中删除两个文本框中的初始text 属性值。要求当程序运行时，当在文本框1中输入任意一个字符时，同时在文本框2中显示出来，同时也在窗体中显示出来。 3、实现“减法器”功能。
《FOR循环语句》 一．教学目标 在教学过程中，充分发挥学生的主体作用、调动学生的学习积极性，有效地培养学生的分析问题、解决问题的能力，主要体现下面三个目标： 1、知识目标:通过FOR/NEXT语句的学习,理解循环过程，能写出简单的循环程序。 2、能力目标:培养学生分析问题，解决问题的能力。 3、情感目标:激发学生学习热情，培养学生学习的积极性。 二．教材分析 本节课的教学内容是信息技术选修模块一《算法与程序设计》中的第2章第4小节《程序的循环结构》,由for/next循环语句的基本结构及其执行过程还有练习题目三部分组成，是程序设计中的重点也是难点,后续的算法的设计教学，都要以此为基础。本节内容注重实例分析,通过教师的引导,让学生感受和领悟循环结构的执行方式，解决实际问题。 三．教学重难点 重点：掌握FOR/NEXT循环语句的格式，并能运用它来编写程序。 难点：解决问题的思路和方法（算法）,流程图制作,确定循环变量和循环体。四．教学过程 【现实生活中的实例】 设问:1+2+3+4+...+98+99+100=? 【引入】 循环的概念 循环结构是程序设计中的一种基本结构。当程序中出现需要反复执行相同的代码时，就要用到这种结构。循环结构既可以简化程序，又可以提高程序的效率。 在VB中实现循环结构的语句常用的有For…Next语句和Do…Loop语句。 【新课】 1.格式 For 循环变量＝初值To 终值[Step 步长] 循环体 Next 循环变量 2.说明 ·循环变量：亦称为循环控制变量，必须为数值型。 ·初值、终值：都是数值型，可以是数值表达式。 ·步长：循环变量的增量，是一个数值表达式。一般来说，其值为正，初值应小于终值；若为负，初值应大于终值。但步长不能是0。如果步长是1， Step 1可略去不写。其值可以是实数，VB自动调整为整数。 ·循环体：在For语句和Next语句之间的语句序列。
一、VB 基本知识及选择、循环结构习题 一、基本概念题 （1） 说明下列哪些是Visual Basic 合法的直接常量，并分别指出它们的类型。 %100 1E1 123D3 123,456 0100 “ASDF” “” #2004/10/7# 100# π &O78 &H123 True T -1123! # （2）下列数据哪些是变量，哪些是常量是什么类型的常量 Name “name” False ff “11/16/99” cj “120” n #11/12/2004# （3） 下列符号中，哪些可以是Visual Basic 的合法变量名 A123 a12_3 123_a a,123 a 123 Integer XYZ False Sin(x) 变量名 sinx π （4）把下列数学表达式写成Visual Basic 表达式： （1）5||z y x ++ （2）6)1(xy + （3）xy y x 310+ （4）a ac b b 242-+- （5）3211111r r r ++ （6）110ln 45sin 10++++y x e （5）写出下列表达式的值： （1）123 + 23 Mod 10 \ 7 + Asc("A") （2）Int * 100 + / 100 （3）#11/22/2004# - 10 （4）"ZXY" & 123 & "abc" （6）设a=7，b=3，c=4，求下列表达式的值： （1）a + 3 * c （2）a ^ 2 / 4 （3）a / 2 + 3 \ 2 （4）a Mod 3 + b ^ 3 / c \ 5 （7）写出下列函数的值： （1）Int （2）Fix （3）Sqr(Sqr(81)) （4）Len("Visual Basic 程序设计") （5）Int(Abs(99 - 100) / 2) （6）Sgn(7 * 3 + 2) （7）LCase("Hellow VB!") （8）Mid("Hellow VB!", 4, 3) （9）Left("Hellow VB!", 3) （10）Val("16个加23个") （11）Str （12）UCase("Visual Basic") 二、 选择题 （1）可以同时删除字符串前导和尾部空格的函数是 。 A. Ltrim B. Rtrim C. Trim D. Mid （2）函数Int(Rnd(1) * 10)是在哪个范围产生随机整数 。 A. (0,1) B. (0,9) C. (1,10) D. (1,9) （3）数学式子sin25o写成Visual Basic 表达式是 。 B. Sin(25) C. Sin(25o) D. Sin(25*180) （4）表达式16/4 – 2^3 * 8/4 Mod 5\2的值是 。 A. 14 B. 4 C. 20 D. 2 （5）数学关系式103<≤x 表示成正确的VB 表达式为 。 A. 3<= x <10 B. x >= 3 And x<10 C. x>=3 Or x<10 D. 3<= x And <10
注：被中括号(“[”、“]”)括起来的都是可选参数！ For Each ... Next 语句： 语句格式 For Each Variant In Collection Or Array [Statement(s)] [Exit For] [Statement(s)] Next [Variant] 参数解释 Variant: 如果In后面是一个集合(Collection)，Variant可以是任何数据类型的一个变量；如果In后面是一个数组(Array)，Variant就只能是一个Variant变量。 Collection: 可以是任何一个对象集合。 Array: 可以是任何一个数组(Type数组除外)。 Statement(s): 可以是任何一句或多句语句。 Exit For: 可以强制退出循环体。 For Each ... Next 语句的作用 集合/数组里面有多少对象/多少维，For Each ... Next语句就会执行多少次Statement(s)。 Do ... Loop 语句： 语句格式 Do [{While | Until} Condition] [Statement(s)] [Exit Do] [Statement(s)] Loop [{While | Until} Condition] 参数解释 While: 如果While在Do后面，那么循环体一开始就会检查Condition的值，如果Condition的值为False，就退出循环体；否则，执行Statement(s)；如果While在Loop后面，则在执行完第一次Statement(s)时才检查Condition的值，如果Condition的值为False，就退出循环体；否则，继续循环。 Until: 如果Until在Do后面，那么循环体一开始就会检查Condition的值，如果Condition的值为True，就退出循环体；否则，执行Statement(s)；如果Until在Loop后面，则在执行完第一次Statement(s)时才检查Condition的值，如果Condition的值为True，就退出循环体；否则，继续循环。 Condition: 可以是任何一个表达式。
V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 ……
浙教版高一信息技术VB循环语句教学设计 省象山中学章婷红 315700 zthddsina. 一、设计思想 本节课以一个小游戏导入，引导学生在解决游戏问题的过程中去探索其背后隐藏的算法思想，一个基本的程序结构――循环结构。学会使用循环语句是编程的基本功，因此本课对提高学生的阅读程序和编写代码能力有着非常实在的意义。循环语句是三种基本语句中难度最大的一个，为了降低学习难度，提高学生的兴趣，我用烧杯和量筒来比喻循环语句中累加器和累加量，使学生快速地理解了累加器的作用，并能正确算出这类程序的运行结果。会读程序之后还要会写，挑选一个好的例子非常重要，我选择了算麦粒画棋盘这个实例，既有经典的计算问题又有直观的画图功能，学生学习积极性比较高。任务的设置由算麦粒的填写部分语句到画棋盘的完全自己编写代码，对学生的要求逐步加深。 二、教材分析 本节容选自教育《算法与程序设计》第四章第三节。 循环语句是程序三种基本语句之一，是学习程序设计的基础，同时也是后面六种算法的重要组成部分。《课程标准》和《学科教学指导意见》对本课的要：理解循环语句的作用，掌握循环语句的使用方法。要求学生能从问题出发，用循环语句编写程序，实现简单的算法。《学科教学指导意见》中三种语句的总课时建议为三课时。我考虑到循环语句是三种语句中难度最大的一个，并且要学习for 和do两种语句，后面六个算法中也基本上都要用到循环语句，所以非常重要。因此循环语句我安排了2课时，本节为第1课时，主要容为for语句，第2课时为do语句及循环综合实例。 三、学情分析 在此之前学生已经学习了算法的流程图、VB基础知识和基本操作及两种语句：赋值语句和选择语句，基本掌握了VB的编程环境。对于for语句，我的要学生先学会读程序，即计算出程序的运行结果，尤其要比较熟练地掌握累加器的作用。在此基本上还要能根据实例编写简单的循环结构的程序。对于读程序，大部分学生能模仿老师的例题分析完成计算。而根据实例编写程序，最主要的是找
循环结构测试题（四）一：选择题 1以下（）是正确的for….nex结构 (A)for x=1 to step 10 (B)for x=3 to -3 step -3 next x (C ) for x=1 to 10 re: … . Next x If I=10 then goto re 2:下列循环语句能正常结束循环的是( ( A)I=5 do I=I+1 Loop until I<0 (C)I=10 do I=I-1 Loop until I<0 3:下面程序段的运行结果为() for I=3 to 1 step -1 print spc(5-I); next x (D) for x=3 to step 3 next y ) (B) I=1 do I=I+2 loop until I=10 (D) I=6 do I=I-2 loop until
for j=1 to 2*1-1 print “ *' next j print n ext I ___________________ l l _________________________________________________ 4下列程序在文本框输入B)“* * ABCD ”四个字符时，窗体上显示的是**(* * ) * * * * *_* * * * * * * * * private sub text1_cha nge() * * print text1.text; end sub 2:下面程序段显示=i(②)个“ * ”。 for j=1 to 4 For I=1 to n 5n* pri nt n For n =2j to I Print Next j Next I 3:下列第40句共执行了（ ③）次，第41句共执行（④ ）次 (A) ABCD (B) (D) A (C )AABABCABCD AB 5哪个程序段不能分别正确显示 1!,2!,3!,4!的C ABC (A) 二：填空题 1:要使下列 for I=1 to 4 n=1 for j=1 to I n=n*j FO F X 语句循环执 行 pri nt n 20次，循环变量 for k=( next i ① )to -5 step — for I=1 to 4 for j=1 to I n=1 n=n*j 的 初值应当是: print n n ext i (B) ABCD (D) N=1 J=1 Do while j<=4 n=n*j pri nt n j=j+1 loop
《VB程序的三种基本控制结构》 复习课教案 平桂高级中学陀君一、案例背景信息 模块：算法与程序设计 年级：高一年级 所用教材版本：粤教版《算法与程序设计》 学时数：1课时（40分钟） 二、教学设计： 1、教学目标： 知识与技能：能根据流程图正确区分VB程序的三种基本结构，并记住相关语句格式，能编写出简单明了的程序关键代码； 过程与方法：充分认识VB程序中三种基本结构的实用性，体会生活中算法的存在和精彩。 情感态度与价值观：培养学生在学习过程中积极思考、自我探究的能力和学以致用的意识。 2、教学重点：顺序、选择（分支）和循环三种基本结构的区分及其对应的VB 语句的使用。 教学难点：for循环结构，各类语句关键代码的编写。 三、教学实录 1．复习引入 师：我们之前学过VB的基本结构，通常程序有三种最基本的结构，是哪三种结构？ 大部分学生在底下小声回答，师让某生回答，说：顺序模式、分支模式、循环模式。
师：分支模式也可称为？ 部分学生：选择模式。 师：非常好，接下来看下这三种结构的流程图，然后分别指出这三个流程图是什么结构。（出示三种流程图结构） 2．正题 （1）顺序结构P38： 执行第一条语句后，必然从第二条语句继续，顺序执行所有的语句，直到执行完最后一条语句为止。 例1：例1、 a=1 b=2 c=a+b a=c-a b=c-a
最后，变量b的值是（ 1 ） （2）选择结构（分支结构）：P42 根据条件判断其是否成立，如果成立执行成立的分支；否则执行另一分支。其一般形式为： If 条件Then 语句序列1 Else 语句序列2 End If 单行形式为： If 条件Then 语句组1 Else 语句组2 例2、a =10 If a>=10 Then a=a+1 Else a=a-1 End If 该程序段运行后，变量a的值是（ D ） A. 8 B. 9 C. 10 D. 11 【师读题，学生思考。请同学回答，让同学们思考a=5结果是多少】 （3）循环结构：P51 根据条件判断其是否成立，如果条件成立则重复执行循环体（循环结构中某语句序列），直到条件不成立，退出循环结构为止。 循环结构的常用形式为： for 循环变量= 初值to 终值[step 步长] [循环体] next [循环变量]
课题：第6课循环结构之Do While-Loop、Do Loop-While语句第课时课型：新授授课时间 教学目标 知识与技能 1、了解循环的概念，理解循环结构的基本思想 2、掌握Do While Loop、Do Loop Until语句的基本结构及区别 3、理解Do While Loop、Do Loop Until语句的执行过程 4、尝试采用循环结构编写简单的程序，解决实际问题 过程与方法通过讲解分析、实践探究、归纳，逐步深化对循环思想和执行过程的理。情感态度与价值观 通过学习运用循环结构处理解决问题，培养学生应用循环思想解决实际问题 的思路和能力。 教学重点1、理解循环结构的基本思想 2、理解Do While Loop、Do Loop Until语句的执行过程 教学难点根据需要采用循环结构解决问题，并提炼出Do While Loop、Do Loop Until语句的基本结构学生理解Do While Loop、Do Loop Until语句的执行过程 教学 准备 几个以Do While Loop、Do Loop Until语句组成的不同功能的程序 教学过程设计 教学内容师生教学活动设计 备注栏 （学生笔记栏） 一、设疑导入（3分钟） 同学们，上节课我们学习了For Next语句，并且用For Next语句编写了“显示乘法口诀表”我们都知道要让计算机重复做一件事时，可以使用循环结构。像我们上节课当中知道乘法表是从一一得一到九九八十一的循环次数。而在现实生活中却有很多问题是事先不知道循环次数的。例如：甲同学每天都坚持写读书笔记300字，问：甲同学多长时间可以写完读书笔记30 万字？心算：一天300，十天3000,100天30000,10000天30万字。可见一件小事要是坚持做，可以完成多么宏大的工程。乙同学，也坚持每天写读书笔记300字，但是他对自己的要求要高一些，第二天总比前一天多写10个字，问乙同学多长时间读书笔记的字数可以超过30万字?心算！@#￥%&*（乱了！）像这样的例子我们事先也不知道是多少天，算起来也烦心，但是如果交给VB 先生的话，就很简单。下面让我们进入今天的主题——循环结构之Do While-Loop、Do Loop-While语句。 二、探索新知（4分钟）
浙教版高一信息技术VB循环语句教学设计 浙江省象山中学章婷红 315700 一、设计思想 本节课以一个小游戏导入，引导学生在解决游戏问题的过程中去探索其背后隐藏的算法思想，一个基本的程序结构――循环结构。学会使用循环语句是编程的基本功，因此本课对提高学生的阅读程序和编写代码能力有着非常实在的意义。循环语句是三种基本语句中难度最大的一个，为了降低学习难度，提高学生的兴趣，我用烧杯和量筒来比喻循环语句中累加器和累加量，使学生快速地理解了累加器的作用，并能正确算出这类程序的运行结果。会读程序之后还要会写，挑选一个好的例子非常重要，我选择了算麦粒画棋盘这个实例，既有经典的计算问题又有直观的画图功能，学生学习积极性比较高。任务的设置由算麦粒的填写部分语句到画棋盘的完全自己编写代码，对学生的要求逐步加深。 二、教材分析 本节内容选自浙江教育出版社《算法与程序设计》第四章第三节。 循环语句是程序三种基本语句之一，是学习程序设计的基础，同时也是后面六种算法的重要组成部分。《课程标准》和《学科教学指导意见》对本课的要求是：理解循环语句的作用，掌握循环语句的使用方法。要求学生能从问题出发，用循环语句编写程序，实现简单的算法。《学科教学指导意见》中三种语句的总课时建议为三课时。我考虑到循环语句是三种语句中难度最大的一个，并且要学习for和do两种语句，后面六个算法中也基本上都要用到循环语句，所以非常重要。因此循环语句我安排了2课时，本节为第1课时，主要内容为for语句，第2课时为do语句及循环综合实例。 三、学情分析 在此之前学生已经学习了算法的流程图、VB基础知识和基本操作及两种语句：赋值语句和选择语句，基本掌握了VB的编程环境。对于for语句，我的要求是学生先学会读程序，即计算出程序的运行结果，尤其要比较熟练地掌握累加器的作用。在此基本上还要能根据实例编写简单的循环结构的程序。对于读程序，大部分学生能模仿老师的例题分析完成计算。而根据实例编写程序，最主要的是找出反复执行的事件，并找到其通式和变化规则，写出循环体语句。这对学生来说是有一定难度的，需要老师慢慢引导点拨。 四、教学目标 （一）知识与技能： 1、理解循环语句的作用，掌握FOR语句的基本格式；能看懂循环结构流程图的执行流程； 2、能根据循环语句的代码写出运行结果，尤其要比较熟练掌握累加器的作用；
第二章 一、问答题 1.叙述建立一个完整的应用程序的过程。 答：界面设计编写事件过程代码运行、调试保存文件 2.当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。问该工程涉及到几个文件要保存？若要保存该工程中的所有文件，正确的操作应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？ 答：涉及到两个文件要保存。先保存窗体文件（.frm），再保存工程文件（.vbp）。若先保存工程文件，系统也会先弹出“文件另存为”对话框，要求把窗体文件先保存。 3.假定在W indows环境中，要保存工程文件时，若不改变目录名，则系统默认的目录是什么？ 答：VB98 4．当标签框的大小由Caption属性的值进行扩展和缩小，应对该控件的什么属性进行何种设置？ 答：将标签的Autosize设置为True. 5．VB6.0提供的大量图形文件在哪个目录下？若你的计算机上没有安装，则怎样安装这些图形文件？ 答：VB6.0提供的图形文件在Graphics目录。 6．在VB6.0中，命令按钮的显示形式可以有标准和图形两种选择，这通过什么属性来设置？若选择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是Caption属性设置的文字，怎样改正？答：按钮Style的属性设置为Graphical（或1）。通过Picture属性来装入图形。不能显示图形是因为Style的属性设置为Standard（或0），只要改为Graphical（或1），一般还将Caption 属性的值设置为空。 7．标签和文本框的区别是什么？ 答：文本是否可编辑。 8．当窗体上有三个文本框和一个命令按钮，若程序运行时，需把焦点定位在第三个文本框处，应对何控件的什么属性进行何种设置？ 答：应对Text3控件进行Text3.TabIndex=0的设置。 9．简述文本框的change与keypress事件的区别。 答：文本框内容变化，change与keypress事件都会发生，所不同的是Keyprees还将返回一个Keyasii参数 10.当某文本框输入数据后（按了回车键），进行判断认为数据输入错，怎样删除原来数据？怎样使焦点回到该文本框重新输入？ 答：假定文本框的名称为Text1，则事件过程如下： Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then If 出错条件判断成立Then Text1＝””…先删除原来数据 Text1.SetFocus …焦点回到Text1 End If …… End If End Sub
信息技术第二十课 教学内容：vb 第六课 教学目标：知识与技能：1、设计程序流程图并学会用vb 语言表达 2、学生掌握循环结构Do 语句的使用 3、掌握程序设计的步骤，具备程序设计思想 过程与方法：从折纸实验出发，学生在共同探究中逐步掌握程序设计 步骤，从肢解代码到分析代码最后设计代码，由浅及深， 最后一个动手实践，让学生在教师的引导下完整的实现 程序设计。 情感态度与价值观：本节课多次对学生情感进行教育，在课前导入后鼓励大 家每天提高一点点，慢慢的量变就会形成质变，探究循环结构多次师生合作，创建和谐的教学氛围，最后的学生动手实践，完整的进行程序设计，收获新知，培养学生的自我效能感。 教学方法：讲授法、任务驱动法 一、课前导入 1、教师展示ppt 中一张白纸，同学们猜猜一张白纸的厚度。 2、一张普通的办公用纸，它的厚度大约有0.05毫米，现在要讲此纸对折5折，纸张的厚度是多少？ 3、 （利用课前准备的白纸逐步引导，学生推导vb 语句） 赋值语句s=s*2 4、假如一位女同学的身高为1.6米，那么折叠多少层可以达到她的高度？ 学生竞猜，教师打开做好的vb 折纸器按照学生猜测的次数进行逐个尝试。 5、达到我国珠穆朗玛峰的高度至少要折叠多少次？ 学生竞猜，教师打开做好的vb 折纸器按照学生猜测的次数进行逐个尝试。 通过为数不多的折纸就可以达到很高，预期会大大出乎学生的意外，此刻介绍吉尼斯世界纪录上所达到的最多次数为13次，鼓励学生课下尝试。 6、展示 鼓励大家每天进步一点点。 二、庖丁解牛 1、古代高斯解决当时一道十分困难的数学题1+2+3+…+100=？ 2、提问：大家知道他是怎么解决这道问题的吗？ 3、今天我们通过vb 程序也可以很快的解决。 展示vb 程序窗体和相应的代码 Private Sub Command1_Click() Dim i As Integer, n As Integer i = 1 n = 0 Do While i <= 100 n = n + i i = i + 1 Loop 毫米6.12*05.05≈03.099.08 .3701.1365365= =
VB程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII 码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3
循环结构是指在一定条件下多次重复执行一组语句。VB中提供了两种循环语句，它们是For 语句和Do语句。 1. For循环语句 如果己知某一段代码需要重复执行的次数，可以使用For循环语句。该语句的一般形式如下： 该段代码的功能是在窗体上显示8行文本，如图3.16所示。如果不采用循环结构，则需要使用8条Print语句来实现相同的功能。 For语句中的循环变量必须是数值型，初值、终值以及步长则是具体的数值 For…next 步长用来指定循环变量每次的增量，当所有循环体中的语句都执行后，循环变量就会自动增加一个步长。默认的步长为1.For语句的执行流程如图3.17所示。
具体执行流程为： （1）将初值赋给循环变量。 （2）判断循环变量的取值是否在终值范围内否则结束循环，执行Next的下一条语句。 （3）将循环变量的取值自动增加一个步长，然后回转到步骤（2）继续执行。 若是则执行循环体内的语句，循环中可以在任何位置放置任意个Exit FOr语句，该语句的作用是退出循环，转到Next语句的下一条语句。Exit For语句经常在条件判断之后使用，例如在If…Then语句之后。 例如，修改上例如下：
实例3.3打印九九乘法表 本例讲解怎样打印九九乘法表，如图3.18所示。九九乘法表的打印看起来很烦琐，但是如果使用嵌套循环，则问题变得非常简单。 打开【代码】窗口，编写窗体的Click事件过程如下： 在该段代码中，首先使用Print方法打印出标题和一个空行。然后使用了一个两重的嵌套循环结构。关于Print方法的使用细节请参见下一章。 2.Do循环语句 如果不知道某一段代码需要重复执行的次数，可以使川Do循环语句0该语句有两种基本形式：
vb中FOR循环语句的教学 vb中FOR循环语句的教学 ——形式多样的多个圆的画法 一、基本说明 1、本教学案例参与人员基本信息 2、教学内容 1）教学内容所属模块：《算法与程序设计》 2）年级：高一二期 3）所用教材出版单位：上海科技教育出版社 4）所属的章节：第二章第四节 5）学时数： 45 分钟 二、教学设计 1、教学目标： l 从形式上大致弄清循环语句结构（for 和next 配套出现）。 l 让学生理解循环的含义和作用（是一次又一次的重复执行某关键操作，而不是一次性地同时完成大量关键操作）。 l 理解循环的执行过程，更进一步弄清循环语句结构。 l 掌握各基本概念及功能 l 体会循环变量给循环体带来的影响 l 最终能透彻理解循环语句，会使用FOR语句编写程序解决问题。
2、内容分析： 循环语句是程序设计的三大基本结构之一，是三个结构中最难的一个，在以往各届教学中学生很难于理解和掌握。由于本人所教5个班中有4个是交费班，学习能力和习惯都欠佳，要求教学者以深入浅出及趣味性的教学吸引学生。 重点：使学生理解循环语句的含义和执行过程，语句中的相关概念。 难点：FOR语句中循环变量的变化，循环次数的决定，循环变量给循环体带来的影响。3、学情分析： 大部分中学生对程序语句和算法的理解能力不强，更由于高中阶段其他课程的繁重课业负担使得学生们不会花多的精力和时间来学这门课。本节课之前学生已学了基本输入输出语句、条件语句、少量控件的使用，对循环语句还没有了解。教师应采用一种让学生很容易接受的方式来学习新知。 4、设计思路： 根据教学内容（FOR语句）讲解很枯燥，中学生不喜欢概念讲解及理论灌输的特点，采用画圆来形象地呈现循环的效果；首先避开语句的介绍，学生先操作体验FOR，对该语句有了感性认识后，教师根据学生的体验进行FOR语句的总结提升，使对该语句上升到理性认识；最后教师对完成的同心圆FOR语句提出进一步的设计要求，使学生在完成过程中更透彻地理解for语句。教学中沿着“体验-感觉-总结-拓展”的思路来学习新知，体现了新课程理念中“以人为本”的思想，注重以学生为主体，师生互动推动教学的进行，枯燥而难懂的内容变得生动形象，由浅入深，容易理解和掌握。 l 引入，知识迁移：画少量圆à画大量圆，用已有知识无法达到目标，引出本节课新的学习内容：FOR循环。
VB程序设计试题及答案(一) 一、单选题 1、VB6、0就是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2、要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句就是正确的。 (A) Forml、Caption=“欢迎使用VB” (B) Forml、Caption='欢迎使用VB' (C) Forml、Caption=欢迎使用VB (D) Forml、Caption="欢迎使用VB" 3、若要使命令按钮不可操作,要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4、如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5、下面A 就是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6、以下关系表达式中,其值为False的就是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7、为了给x、y、z三个变量赋初值1,下面正确的赋值语句就是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8、VB提供了结构化程序设计的三种基本结构,三种基本结构就是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句就是 D 。 (A) If sex="男" And age=4O And InStr(duty,"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty,2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10、下列关于Do…Loop循环结构执行循环次数的描述正确的就是D 。 (A) Do While…Loop循环与Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环与Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次与Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行与Do…Loop Until循环至少执行一次 11、以下B 就是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… Next x Next x