第四章基本结构.ppt

第4章 基本结构 本章目标： 掌握数据基本输入输出方式（用户交互函数和消息框函数） 掌握顺序结构程序设计 掌握选择结构程序设计 掌握循环结构程序设计 4.1 数据基本输入输出 4.1.1 数据输入 在此重点介绍两种数据输入方式，它们是Text文本框和InputBox数据录入框。 1、Text文本框 在VB中，Text文本框是允许用户输入文本信息的直接方式 。 本章小结 本章主要讲述了在VB程序设计中所用到的基本程序结构，其中重点阐述了顺序结构中数据的输入和输出、选择结构语句和循环结构语句，最后阐述了与本章节相关的常用算法并予以例子演示。 图4. 18 While…Wend语句实现 ?例4. 12 编程实现计算 。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim n%, m%, s! m = 1 s = 1 If KeyAscii = 13 Then n = Val(Text1) While m = n s = s * 3 m = m + 1 Wend Label2 = 3的 n 次方= s End If End Sub 4.3.2 For…Next循环结构语句 循环结构语句比较多，当在不知道循环内执行多少次语句时，用Do…Loop循环比较适合，但是当知道要执行的循环次数时，则最好使用For…Next循环。与Do…Loop循环相比，For循环只使用一个循环变量，每次重复一次循环之后，循环变量的值就会自动增加或者减少。 For…Next循环结构语句语法结构： For 循环变量 = 初值 to 终值 [Step步长] [ 语句块序列1 ] [Exit For] [ 语句块序列2 ] Next [ 循环变量 ] 说明（语句的的结构图如图4.19所示）： 1、“循环变量”为必选参数，且此变量不能为数组元素。 2、“初值”和“终值”都是必要参数，如果没有指定“步长”，则“步长”默认值为1。 3、“步长”可以是正数或者负数。“步长”参数值决定循环的执行情况；如果“步长”的值为正数，则初值=终值，否则初值=终值。 4、当循环体中的语句都执行后，“步长”的值会加到循环变量中。此时循环中的语句可能会再次执行（基于对循环开始执行时同样的测试），也可能退出循环并从Next语句之后的语句继续执行。可以在循环体中的任何位置放置任意个Exit For语句，随时退出循环。 5、如果省略Next语句中的“循环变量”，将不影响循环的执行，但如果Next语句在它相对应的For语句之前出现，则会产生错误。 6、循环变量的值一旦改变，程序将会根据改变后的循环变量值发生变化，使用者要小心。 7、循环次数的计算公式为：int（（终值－初值）/步长）+1 循环变量=初值 循环变量=终值 F T 语句块1 有Exit For 语句块2 循环变量=循环变量+步长 T F （a）步长0 循环变量=初值 循环变量=终值 F T 语句块1 有Exit For 语句块2 循环变量=循环变量+步长 T F （b）步长0 ?例4. 13 计算0到100以内的偶数和。 该例题很简单，编写代码如下： Sum = 0 For i = 0 To 100 Step 2 Sum = Sum + i Next I Sum的最终值就是结果。 注意： 1、当退出循环后，循环变量的值保持退出时的值，如例4.13中，退出循环后，i的值为102。 2、循环体内对循环控制变量可多次引用，但不要对其赋值，否则会影响原来的循环控制规律。 ?例4. 14 运行下面一段程序，注意最终输出的结果，仔细分析当在循环体中循环变量发生变化时所出现的结果。 图4. 20 循环体中循环变量变化 Private Sub ommand1_Click() m = 0 For n = 1 To 20 Step 3 m = m + 1 n = n + 4 Print 第; m; 次循环n=; n Next n Print 退出循环后n=; n End Sub 4.3.3 循环嵌套 循环嵌套是指在一个循环体内又包含另外一个完整的循环体。 ?例4. 15 打印50到200之内的素数。 Private Sub Picture1_Click() For m = 51 To 200 Step 2 k = Int(Sqr(m)) k为i开平方取整 i =