VisualBasic程序设计案例教程 第5章 循环结构设计

《VisualBasic程序设计案例教程 第5章 循环结构设计》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、第5循环结构设计计算机具有速度快、精度高的特点，特别适于进行重复性的工作，重复次数越多越能显示它的威力。所以，使用计算机时，应尽量把问题归纳为简单而有规则的重复运算和操作，以充分发挥计算机的特长。理解循环结构设计的特点熟练掌握For．．．Next和Do．．．Loop语句掌握列表框与组合框的常用属性、方法和事件以及实际应用教学重点与难点：对For．．．Next和Do．．．Loop语句的运用，理解掌握并运用掌握列表框与组合框控件第5章循环结构设计5.1.1案例实现过程【案例说明】1、在窗体上显示2-12间各偶数的平方数程序运行效果如图5.1所示分析：采用Print直接在窗体上输出结果，而且使用F

2、or..Next来实现2、求S=1+2+3+...+1000，把结果显示在窗体上程序运行后在窗体中输入为5005005.1For…Next循环语句案例3、求T=10!=123…10程序运行后在窗体中输入为36288004、用级数=，求的近似值，要求取前5000项来计算分析：用Print直接在窗体上输出结果，程序运行后在窗体中输入为=3.141397【案例目的】【技术要点】1．运用【案例说明】中的第一部份：在窗体上显示2-10间各偶数的平方数（1）启动VB后，进入代码窗口（可以直接双击窗口）采用Print直接在窗体上输出结果，程序代码如下：PrivateSubForm_load()DimkAs

3、IntegerShowFork=2To12Step2Printk*kNextkEndSub5.1For…Next循环语句案例程序运行结果是：如图5.1所示。分析：在上述For...Next循环语句中，循环变量k的初值、终值和步长值分别为2，12和2，即从2开始，每次加2，到10为止，控制循环6次。每次循环都将循环体（即语句Printk*k）执行一次，因此运行后的输出结果是4，16，36，64，100和144。2．运用【案例说明】中的第二部份：求S=1+2+3+...+1000，把结果显示在窗体上。（1）启动VB后，进入代码窗口（可以直接双击窗口）。采用Print直接在窗体上输出结果，程序代码

4、如下：PrivateSubForm_Load()Shows=0Fork=1To1000s=s+kNextkPrint"s=";sEndSub5.1For…Next循环语句案例程序运行结果是：500500分析：由于此题的循环中，循环终值为1000，不可能向上例中，一一分析，但读者可以分析前几个数据即可。步长为1所以此题中没有写出。3．运用【案例说明】中的第三部份：求T=10!=123…10，把结果显示在窗体上。（1）启动VB后，进入代码窗口（可以直接双击窗口）。采用Print直接在窗体上输出结果，程序代码如下：PrivateSubForm_Load()Showt=1Forc=1To10t=t*

5、cNextcPrint"T=";tEndSub5.1For…Next循环语句案例程序运行结果是：3628800分析：用For…Next实现阶乘，结构和过程都非常简单，读者在分析上述实现过程中，一定要注意t=1用法，如果不赋初值，t=t*将永远等于0。原因就是，在VB中没有赋初值的变量为0。5.1.2应用扩展我们在前面案例基础之上把For…Next语句引入到相对较复杂的问题中去，读者在处理这此问题的时候，要抓住问题的本盾，即无论问题有多复杂，但For…Next语句没有变化。用级数=，求的近似值，要求取前5000项来计算要解答以上问题，首先我们要把复杂问题简单化，即怎样把以上计算式转化为可理解的

6、，可执行的内容。第二，5000项我们不可能加5千次，所应该首先想到用循环来实现。通过分析我们可以设=pi=，我们求出pi后，然后=pi*4，即为最后所求。5.1For…Next循环语句案例采用Print直接在窗体上输出结果，程序代码如下：PrivateSubForm_Load()DimpiAsSingle,cAsInteger,sAsIntegerShowpi=0s=1's表示加或减运算Forc=1To10000Step2pi=pi+s/cs=-s'交替改变加、减号NextcPrint"π=";pi*4EndSub程序运行后在窗体中输入为：=3.1413975.1For…Next循环语句案例

7、请读者注意，pi=pi+s/c和s=-s代码其实就是对进行了分解，请注意理解。5.1.3相关知识及注意事项1．For...Next语句For...Next语句的语法格式如下：For循环变量=初值To终值[Step步长值]循环体Next循环变量功能：本语句指定循环变量取一系列数值，并且对于循环变量的每一个值，把循环体执行一次。初值、终值和步长值都是数值表达式，步长值可以是正数(称为递增循环)，也可以是负数（称为