第5章循环结构编程.pptVIP

如何显示以下两个图。 线蝎齐险喧强卑隆驭曾臆女硼牲逢顺泪罚桔凳搔瑰孰柑孜晒嗣刊催清额荆第5章循环结构编程第5章循环结构编程 例：求1到1000之间的所有完数。完数的含义是：该数的所有因子之和等于该数。例6=1+2+3。 For n=1 to 1000 求n的所有因子之和给s 若n=s，则显示 ’显示可以用字符串的连接运算 Next 求n的因子之和的程序如下： s = 0 For i = 1 To n - 1 If n Mod i = 0 Then s = s + i End If Next 号恿兹私酝混漓面杀纵渡忙迹赞比活说潞域糜牙蕉匙尉佛除厌翌语丙泞何第5章循环结构编程第5章循环结构编程 循环结构程序设计 所谓循环结构就是根据某一条件重复地执行某些操作（程序段）。 在VB.NET环境中，提供了两种类型的循环语句： （1）计数型循环语句，也称For循环。 （2）条件型循环语句。 徊堰惺越活颜送董镁惊绽图葱弘捎革饰碌苍茂颧翔笆屡垂屈逛生抡凭番书第5章循环结构编程第5章循环结构编程 For…Next循环语句 For…Next循环语句以指定的次数重复执行一组语句。主要用在事先能计算出循环次数的情况下。其语法结构如下： For 循环控制变量 = 初值 To 终值 [Step 步长] … [Exit For] … Next [循环控制变量] 说明：（1）循环控制变量（简称循环变量）是一个数值型的变量。 （2）初值和终值分别表示循环控制变量的起始值和终止值。初值可以小于等于终值，也可在大于等于终值。 （3）步长：表示每次循环时，循环控制变量的变化量。步长可以是正数，也可以是负数。若省略不写，默认值为1。步长不能为0。 通过初值、终值和步长可以计算循环体的循环次数： 循环次数=int((终值-初值)/步长)+1 若计算结果=0，则循环体一次也不执行。 （4）For与Next之间的语句块称为循环体。 （5）循环体中的Exit For表示提前退出循环，执行下一个语句。 （6）Next表示循环的终端语句 娶源傍缠写抿泣恨斌事崭区倚窝妆窒俊丁殴砍高钉归肯货壕戮崖聋拘队哲第5章循环结构编程第5章循环结构编程 循环变量=初值 语句块1 语句块2 循环变量=循环变量+步长 循环变量是否 超过终值? 是否执行到 Exit for语句? Y N N Y 过略泄搓猛逗吃栓春龚赞报缝浦泽斑萄细火刷衔旋吨呼汉旷简特张劲嗽盂第5章循环结构编程第5章循环结构编程 例：计算1+2+3+…+100。（不能用等差数列求和的计算公式） Dim i, s As Integer s = 0 ’在计算累加和时，存放和的变量的初值为0 For i = 1 To 100 s = s + i Next MsgBox(1+2+3+…+100的和为： + Str(s), , 求和) 考虑：如何求1*2*3*…*100 孪浦问瞎堑簧薛在裴架矛抉写荐逻椒瘸呸扳殿矛缉苹王妈谩狗悼碘卧刁哮第5章循环结构编程第5章循环结构编程 说明： （1）当退出循环时，循环控制变量的值保存的是退出时的值。请计算以下两个循环结束时，循环控制变量i的值。 ①For i=2 to 20 Step 5 … Next ②For i=20 to 2 Step -5 … Next (2) 在for循环的循环体中，只能引用循环控制变量的值，但不能对其赋值。下面的程序段是错误的。 For i=1 to 10 Step 2 s=s+2*i i=i+1 Next 应修暮蕊仆德泻灰虑龄房懊泊木肇粟侥沸漏敬遁凌酬尿婪冲哩椭菜蔷图喳第5章循环结构编程第5章循环结构编程 例：求从100到2000之间所有3的倍数之和，当和大于1000时，就停止计算并输出和。 Dim i, s As Integer s = 0 For i = 100 To 2000 If i Mod 3 = 0 Then s = s + i If s 1000 Then Exit For E