第6节基本控制结构.pptVIP

第6章 基本控制结构 6.1 顺序结构 6.2 选择结构 6.3 循环结构 6.1 顺序结构 顺序结构不需要任何控制语句，只按一定的次序编写就可以。程序执行时，各语句按照出现的先后顺序依次执行。 前面第4章已介绍的VB输入与输出操作，以及与之有关的函数调用程序，均属于顺序结构。 与顺序结构有关的几种命令语句或函数： 赋值语句； 数据输入/输出函数和过程 卸载对象语句；结束程序语句 应用举例: 交换两个变量的值 二、数据输入/输出函数和过程(复习) InputBox函数： InputBox[$] (Prompt[,Tiltle][,Default][,Xpos,Ypos]) MsgBox函数： MsgBox(Prompt[, Buttons] [,Title]) MsgBox过程： MsgBox Prompt[, Buttons] [,Title] 三、Unload语句 (1)建立窗体界面 四、End语句 格式： End 功能：强迫结束一个程序或程序块的执行,可被放入过程中的任何位置。 说明：End语句强制终止程序，程序正常结束前先卸载所有的窗体、关闭所有调用的文件 。 五、Rem语句－注释语句 六、暂停语句 格式：stop 作用：将程序变成中断模式，便于进行检查和调试，相当于在程序中设置断点。 说明： (1) 可以在程序中的任何地方放置Stop语句，当执行Stop语句时系统将自动打开“立即”窗口。 (2) 与End语句不同，Stop不会关闭任何文件，或清除变量。 6.2 选择结构 一、单行结构条件语句 二、块结构条件句 三、多分支语句（Select...Case） 一、单行结构条件语句 格式：If 条件 Then 语句1 [Else 语句2] 功能：满足条件则执行语句1 ，否则执行语句2 说明： 条件语句中的“语句部分1”和“语句部分2”都可以是条件语句，即条件语句可以嵌套。 条件语句嵌套使用举例： 例6.4 学校对学习成绩优良的学生进行奖励，满足下列三个条件之一者获奖。 (1) 所考5门课的总分超过450分。 (2) 每门课的成绩都在88分以上。 (3) 前3门（主课）的成绩都在95分以上，其他两门（非主课）的成绩都在80分以上。输入某学生5门课的成绩s1、s2、s3、s4、s5，判断他是否能够获奖。 (1)程序流程图 (2)用户界面与控件属性设置 (3)程序代码 Exam6_4.vbp Private Sub Command1_Click() Dim s1 As Single, s2 As Single, s3 As Single, s4 As Single, s5 As Single Dim p As String s1 = Val(InputBox(请输入第1门课的成绩：, 输入框, 0)) …… s5 = Val(InputBox(请输入第5门课的成绩：, 输入框, 0)) t1 = (s1 + s2 + s3 + s4 + s5 = 450) t2 = (s1 = 88 And s2 = 88 And s3 = 88 And s4 = 88 And s5 = 88) t3 = (s1 = 95 And s2 = 95 And s3 = 95 And s4 = 80 And s5 = 80) If t1 Or t2 Or t3 Then p = 可以获奖！ Else _ p = 不能获奖！ p = Str(s1) , Str(s2) , Str(s3) , _ Str(s4) , Str(s5) Chr(13) p Label1.Caption = 该生五门课的成绩分别是： _ Chr(13) p End Sub 二、块结构条件句 If 条件1 Then 语句块1 [ElseIf 条件2 Then 语句块2] [ElseIf 条件3 Then 语句块3] …… [ElseIf 条件n] Then 语句块n] [Else 语句块 n+1] End If (1) ElseIf是一个关键字， Else和If之间不能有空格，否则程序出错。 (2) “语句块”为多个语句时，可以分别写在多行里，如果写在一行里，各语句之间用冒号“：”隔开。 (3) 块结构条件语句必须以End和If结束，而“单行结构条件语句”中没有End If。 (4) ElseIf 子句和Else子句省略时，则形式变为： If 条件 Then 语句块 End