第7章控制结构.pptVIP

39 7.1 选择控制结构--行If条件语句 7.1.1 单行结构条件语句 If 条件 Then then 部分 [Else else部分] 功能：如果“条件”为True，则执行“then部分”，否则执行else部分 注意：每一个“Else”部分都与它前面、且未曾被配对的“If-Then”配对 例如，If Data=90 Then Print “优秀” [例7.1]输入一个数，如果是3的 倍数则通过消息框输出。 Private Sub Form_Click() Dim Data As Integer Data = InputBox(请输入一个值：) If Data Mod 3 = 0 Then MsgBox Data End Sub 块结构条件语句-2 注意： “语句块”中的语句不能与其前面的then在同一行上，会被认为是一个单行结构 块结构条件语句中， ElseIf子句的数量没有限制 块结构条件语句中， ElseIf子句和Else子句都是可选的 某些情况下，可能有多个条件为True，但也只能执行一个语句块 块形式的条件语句可以嵌套，即把一个If···Then···Else块放在另一个If···Then···Else块内 7.2 多分支控制结构-- Select Case选择语句 Select Case 测试表达式 Case表达式表列1 语句块1 　[Case表达式表列2 [语句块2]] 　　　······ 　　　　　[Case Else 　　　　　　　 [语句块ｎ]] 　　　　 End Select 功能：根据“测试表达式”值，从多个语句块中选择符合条件的一个语句块执行 7.3 控制结构 Visual Basic提供三种不同风格的循环结构： 计数循环(For-Next循环) 当循环(While-Wend循环) Do循环（Do-Loop循环） For循环控制结构 For 循环变量 = 初值 To 终值 [Step 步长] [循环体] [Exit For] Next [循环变量] [，循环变量]······ 工作原理 For循环控制结构--2 注意： 参量含义：循环变量 、初值 、 终值 、 步长 、循环体、 Exit For、 Next “先检查，后执行”原则 For和 Next必须成对出现，且For必须在Next之前 循环次数=Int（终值 —初值）/步长+1 可嵌套使用，且没有层数限制，但每个循环必须有一个唯一的变量名作为循环变量，内层循环的Next必须放在外层循环的Next 之前，内外循环不得互相“骑跨” 7.4 当循环控制结构 While 条件 [语句块] Wend 注意： “先检查，后执行”原则 若条件总是成立，则不停重复执行循环体 避免死循环 循环可嵌套，层数没限制，每个Wend和最近的While相匹配 7.5 Do循环控制结构 Do [语句块] [Exit Do] Loop [While|Until 循环条件] 7.7.1 程序调试－程序的错误类型 7.7.2 程序调试－简单调试 7.7.3 程序调试－使用调试工具(一) 程序调试－使用调试工具(二) 第7章 控制语句与程序调试 小结： 掌握If 条件语句和Select Case选择语句 掌握For…Next和Do…Loop循环语句 掌握两重循环，了解多重循环 了解Exit、End语句 掌握程序的简单调试方法 7.7 程序调试－调试方法与工具 程序调试一般可采用中断调试和单步调试两种方法。其中，运行错误更多采用中断调试；逻辑错误则更多采用单步调试。为便于程序调试，Visual Basic提供了许多实用有效的调试工具，如：立即窗口、本地窗口和监视窗口。 * 语法错误 运行错误 中文逗号 n未赋过值 逻辑错误：算法不正确。显然系统不会报告这类出错信息。 * 方法：在程序中适当插入Print语句跟踪变量值的变化 ％－32768～32768；－2147483648～2147483648 * 1. 断点调试 断点：程序执行到该此自动暂停 单击“继