VisualBasic程序设计教程.pptVIP

Visual Basic程序设计教程 计算机科学教研室 授课教师：李廷元 E-mail: acetao@163.com 第五章 循环结构程序设计 5.1 For-Next循环 5.2 While-Wend循环 5.3 Do-Loop循环 5.4 列表框和组合框 5.5 多重循环 5.6 GoTo语句控制循环 5.7 常用算法(1) 第五章 循环结构程序设计 循环的分类 当型循环 先判断条件，条件为真，反复执行循环体A；条件为假，退出循环 第五章 循环结构程序设计 循环的分类 直到型循环 首先执行一次循环体A，再判断条件；若条件为假，继续执行A操作，直到条件为真退出循环 5.1 For-Next循环 For 循环变量 = 初值 To 终值 [step 步长] 语句块 [Exit For] 语句块 Next 循环变量 功能：根据指定的循环次数执行循环体 适用场合： 循环次数确定 5.1 For-Next循环 循环变量的初值、终值和步长均是数值表达式。其中步长可以是正数，也可以是负数，但不能为0。当步长略去不写时，默认为1 利用Exit For语句可提前结束循环 关键字Next为循环正常结束的终端语句，Next语句中的循环变量必须与For语句中的循环变量一致 如果循环变量的值在循环体内不被改变，则循环次数由初值、终值和步长按以下公式计算 循环次数 = Int ((终值-初值)/步长+1) 5.1 For-Next循环 【例5-1】 计算一个自然数的阶乘n! 5.1 For-Next循环 【例5-2】计算2+4+6+…+100 5.1 For-Next循环 【例5-3】计算1+2!+3!+…+10!的值 5.1 For-Next循环 【例5-4】显示如右三角形图案 5.1 For-Next循环 【例5-5】已知2000年我国的人口是12.6583亿，如果在以后的5年内人口每年平均增长1.07%，问到2005年我国的人口是多少 ? 解题思路： 如果用P表示人口数，R表示年平均增长率，则第二年的人口数的计算公式为Q=P(1+R) 由For循环执行上述公式5次 5.1 For-Next循环 Private Sub Form_Click() p = 12.6583: R = 0.0107 For i = 2001 To 2005 p = p * (1 + R) Next i Form1.Print 2005年人口数:; p End Sub Private Sub Form_Load() Form1.AutoRedraw = True Form1.Print 单击鼠标计算2005年人口数 End Sub 5.2 While-Wend循环 格式： While 条件 语句块 Wend 功能：当给定的条件为真时，执行循环中的语句块 条件：布尔表达式 5.2 While-Wend循环 【例5-6】从键盘输入若干学生的成绩，按成绩划分等级，并统计学生总人数及各个等级的学生人数。 成绩分为五类：90分～100分为优秀、80分～89分为良好、70分～79分为中等、60分～69分为及格、0分～59分为不及格。 【例5-6】 Private Sub Command1_Click() no = 0: a = 0: b = 0: c = 0: d = 0: e = 0 x = Val(InputBox(输入成绩，输入0-100以外的数时结束)) While x = 0 And x = 100 no = no + 1 If x = 90 Then a = a + 1 ElseIf x = 80 Then b = b + 1 ElseIf x = 70 Then c = c + 1 ElseIf x = 60 Then d = d + 1 Else e = e + 1 End If x = Val(InputBox(输入成绩，输入0-100以外的数时结束)) Wend End Sub 5.2 While-Wend循环 【例5-7】已知2000年我国的人口是12.6583亿，如果在以后每年平均增长1.07%，问多少年后我国的人口达到13亿 5.3 Do-Loop循环 格式1: Do 语句块 [ Exit Do ] Loop [ While | Until 条件 ] 先执行后判断，至少执行一次 关键字While指明条件为真时执行循环体中的语句，Until正好相反 5.3 Do-Loo