第8章 模块南科培训.ppt

2.调试工具的使用 介绍工具栏各按钮：继续：用于在调试运行的“中断”阶段程序继续运行至下一断点或结束程序；中断：用于暂时中断程序运行；重新设置：用于终止程序调试，返回编辑状态； * 切换断点：用于设置/取消“断点”；逐语句：用于单步跟踪操作；逐过程：用于单步跟踪操作，但遇到调用过程语句时，只在过程内单步执行；跳出：提前结束被调用过程代码的测试；本地窗口：用于打开“本地窗口”；立即窗口：用于打开“立即窗口”； 监视窗口：用于打开“监视窗口”； 快速窗口：用于打开“快速监视”。 * * * 8.4 VBA流程控制语句 计算机程序的执行控制流程有3种基本结构：顺序结构、条件判断结构和循环结构。顺序结构：顺序执行程序语句条件判断结构：按照给定的条件进行判断，再按判断结果分别执行程序中不同部分的代码。循环结构：按照条件反复执行一系列语句。根据循环的条件，可以把循环结构分为两类： 当型循环结构：当条件成立时，反复执行语句。 直到型循环结构：反复执行语句直到条件成立为止。 * 三种基本结构 * 语句1 语句2 顺序结构 条件 语句1 语句2 Y N 选择结构 三种基本结构 * b) 直到循环 条件 语句组 Y N a) 当型循环 条件 Y N 语句组 一、赋值语句赋值语句主要用于为变量指定一个值或者表达式，通常以“=”连接。格式：[Let]变量名=值或者表达式 ‘Let为可选项例如：定义一个单精度数值，并赋值为1.23456。 Dim i as single i=1.23456 二、条件语句1.单分支结构（If…Then语句）If测试指定的条件，如果条件为真（True），则执行Then后面的语句。格式1：If 条件表达式 Then 语句 * 格式2： If 条件表达式 Then 语句块 End If注意：If…Then的单行格式不用End If。但如果条件表达式为真（True）时，要执行多行代码，则必须使用多行If…Then…End If语法。例:已知两个数x和y，比较它们的大小，使得x大于y。 If xy Then  t=x : x=y: y=t End If 或 If xy Then t=x: x=y: y=t * * 以下是一个竞赛评分程序。8个评委，去掉一个最高分，去掉一个最低分，计算平均分（满分10分）。 Private Sub Form_Click() Dim Max As Integer, Min As Integer Dim i As Integer, x As Integer, s As Integer Dim p As Single Max=0 : Min=0 For i=1 To 8 x=Val(InputBox(请输入分数) ) If _____ Then Max=x If _____ Then Min=x s=s+x Next i s= ______ : p=s/6 MsgBox 最后得分：“ p End Sub (2005.4) x Max x Min S-Max-Min 2.双分支结构（If…Then…Else）格式：If 条件表达式 Then 语句块1 Else 语句块2 End If当条件为True时，执行语句块1，为False时，执行语句块2。例：用If…Then语句结构编程计算表达式y的值 当x0时，y=x+1 当x0时，y=x-1 当x=0时，y=0 * 程序代码：If x0 Then y=x+1else If x0 Then y=x-1 else If x=0 Then y=0 End If End IfEnd If * IF语句的嵌套：多重选择嵌套IF语句应注意书写格式，为提高程序的可读性，多采用锯齿型。注意If与End If的配对。多个If嵌套，End If与它最近的If配对。 3.多分支结构（If…Then…Elseif语句）格式：If 条件表达式1 Then 语句组1elseif 条件表达式2 Then 语句组2elseif 条件表达式3 Then 语句组3…elseif 条件表达式n Then 语句组nelse 语句组n+1end if * 例：输入一学生成绩，评定其等级。方法是：90~100分为“优秀”，