大学计算机基础-第1章 程序设计技术Visual Basic.pptVIP

10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 5．If 的嵌套语句 （2）功能。 “If－Then－ElseIf－End If”的功能类似于选择结构的嵌套。 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 6．“当”型循环语句 （1）格式。 While 条件 循环体 Wend 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 6．“当”型循环语句 （2）功能。 当“条件”为真时，顺序执行循环体。当“条件”为假时，脱离循环，程序转到Wend以后继续执行。 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 6．“当”型循环语句 （3）说明。 ① While和Wend必须配对使用。 ② 为使程序正确执行，循环体中必须有改变条件的语句。 ③ 要想执行循环体，必须先执行While。 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 7．“直到”型循环语句 （1）格式。 Do 循环体 [Exit Do] Loop [While|Until 条件] 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 7．“直到”型循环语句 （2）功能 格式中如果选择了“While 条件”，则表示“当”条件为真时执行循环（当型循环），是后比较条件的While-Wend循环；格式中如果选择了“Until 条件”，则表示“直到”条件为真才不执行循环（直到型循环）（条件为假时执行循环）。 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 7．“直到”型循环语句 （3）该循环的常用格式为： Do 循环体 If 条件 Then Exit Do Loop 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 8．“步长”型循环语句 （1）格式。 For 循环变量=初值 To　终值 Step 步长值 循环体 [Exit For] Next 循环体变量 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 8．“步长”型循环语句 （2）功能 当循环变量不“超过”终值时，将一次增加一个步长值地重复执行循环体。其具体执行过程是：执行到For语句时，循环变量先得到“初值”，然后与“终值”比较。如果循环变量未“超过”终值，那就执行循环体。执行到Next语句时，循环变量累加一个步长值，之后再与终值进行比较，若没有“超过”终值，则重复上述过程，直到循环变量“超过”终值才退出循环而转到Next语句后继续执行。 10.5 Visual Basic 6.0初步 10.5.3 Visual Basic的几个简单语句 8．“步长”型循环语句 （3）说明。 ① For 和 Next 必须配对使用。 ② 当步长值为1时，“Step 1”可省略。 ③ 当步长值 0时，“超过”就是“”； 当步长值 0时，“超过”就是“”。 ④ 循环变量应尽量使用整型变量，以免出现误差。 ⑤ 循环结束后，循环变量的值不变，即保持当前值。 循环结构也可以嵌套。 10.5 Visual Basic 6.0初步 10.5.4 程序实例—聪明的宰相 【例10.2】相传古代印度国王舍罕要褒奖他聪明能干的宰相（国际象棋发明者）达依尔。国王问达依尔需要什么，达依尔说：国王只要在国际象棋棋盘上的第一格放一粒小麦，第二格放两粒小麦，第三格放四粒小麦，以后按此比例每一格都是前一格的两倍，一直放满64格，我将感激不尽！国王一听马上便答应下来。但是结果却让国王大吃一惊。这到底是怎么回事呢？下面编写程序，让计算机来算一算这笔账，看看到底是什么结果让国王大吃一惊（假定1.42?×?108粒小麦/m3，计算一下这么多小麦有多大的体积）。 10.5 Visual Basic 6.0初步 10.5.4 程序实例—聪明的宰相 【例10.2】 1．分析问题，确定算法 10.5 Visual Basic 6.0初步 10.5.4 程序实例—聪明的宰相 【例10.2】 2．绘制流程图 10.5 Visual Basic 6.0初步 10.5.4 程序实例—聪明的宰相 【例10.2】 3．设定控件的属性和作用 在窗体中： “标题”设定