第4章基本程序结构.ppt
倍 银 饲 蒲 氢 皖 琉 契 偷 奸 肤 悲 晋 瘪 锦 捻 哺 单 哉 碱 伎 祈 浑 解 乓 乒 竭 爷 搞 儒 句 丰 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 第4章 基本程序结构 郭清溥 氰 踪 委 至 夺 磐 糟 扎 米 恍 傅 育 并 瀑 续 莆 氮 萌 咳 酸 是 随 诗 衣 媒 藐 瑶 嗣 印 晴 敲 哦 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 2 第4章基本程序结构 编写相应各种事件的程序代码，这是程序 设计的重点和难点。 程序设计有三种基本结构，它们是顺序 结构、选择结构和循环结构，这是程序 设计的基础，这些内容将在本章中一一介绍。 同时还在最后一节介绍一些程序设计中的常用 算法。 【本章导读】 恼 炸 赔 珐 畅 韦 忧 紫 弘 舜 藉 帮 识 冈 盛 灿 幅 妥 骤 羹 卵 槐 鸿 摸 贵 寻 模 乳 弄 澜 幂 力 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 3 第4章基本程序结构 1. 顺序结构 2. 选择结构 3. 循环结构 4. 几种常用的算法介绍 【本章要点】 8学时（理论），8学时（上机） 课时安排 曰 濒 胃 拽 阉 书 啃 崭 锑 飞 腰 洛 菲 哮 撅 扩 罐 促 末 诲 释 士 起 士 槽 传 势 御 屑 寺 娄 挞 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 4 语句组1 语句组n 语句组2 4.1 顺序结构的程序设计 顺序结构是一种线性结构。是程序设计中最简单同 时也是最基本的结构。它要求顺序地执行每一个基本 的加工处理单位。 语句组2 语句组1 开始 结束 语句组n 单 巾 瓜 屁 于 异 女 践 荡 承 灵 森 阔 拍 样 醇 宜 熔 桅 怠 颓 臃 掉 焰 溯 饶 氦 厦 赖 阔 殖 国 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 5 4.1 顺序结构的程序设计 在计算机中让一个没有被赋予具体值的变量参与运算是没 有意义的。因此给变量提供初值是程序中不可缺少的步骤。 计算表达式的值，并将其提供给变量 或 修改指定对象的属性值。 Let = 或 Let . = 格式 功能 4.1.1 赋值语句 辐 尾 萄 妆 晕 埋 即 矣 攘 柬 礁 闷 君 殉 重 仑 掉 陕 卑 注 拍 撅 涪 瑶 学 矗 滥 进 谅 绣 穗 箍 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 6 4.1 顺序结构的程序设计 在计算机中让一个没有被赋予具体值的变量参与运算是没 有意义的。因此给变量提供初值是程序中不可缺少的步骤。 Let intMax = 0 该语句将数值型数据0保存在变量intMax中。 Text1.Text = “河南财经学院“ 该语句将名称为Text1的TextBox控件的Text属性 值修改为“河南财经学院”。 例如 4.1.1 赋值语句 佰 役 盔 悔 唤 碗 庭 忱 锈 妊 壳 罢 慕 按 役 心 孕 艳 臼 企 崎 厂 腾 驹 锄 鞭 畔 韶 冉 穿 炸 无 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 7 4.1 顺序结构的程序设计 1. 命令关键字 Let 可以缺省； 2. 语句格式中的符号“=”是 赋值号， 与数学中的等号只是形式上一样； 3. 一个赋值语句只能给一个变量赋值； 4. 赋值符号“=”右边的表达式可以是变量、常量、 函数等； 5. 赋值符号“=”左边只能是变量名或对象的属性引 用，不能是常量、符号常量、表达式； 6. 赋值号两边的数据类型一般应该一致。 说明 4.1.1 赋值语句 钟 羊 羊 茬 隶 茧 围 石 谁 聂 搜 茧 烦 煽 恼 嚏 侵 对 漂 占 匡 颗 哀 衍 绘 吠 淮 朗 工 宿 圭 贵 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 8 4.1 顺序结构的程序设计 X = 8 ，Y = 9 N = N + 1 M = X = 8 Exp = Sqr(3) 5 = X + Y X + Y = 5 X = 8 : Y = 9 表示 N 累加 1 将 X = 8 的值（逻辑量） 赋给 M Exp1 = Sqr(3) 赋值号左边不能是常量 赋值号左边不能是表达式 4.1.1 赋值语句 斌 躺 蒲 氖 炯 畸 赞 仿 雕 爵 律 疯 陪 葬 焦 芥 担 锌 黄 揽 凄 诗 衬 标 端 穷 亮 屹 他 玉 软 唱 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 9 4.1 顺序结构的程序设计 编写程序，求摄氏温度与华氏温度的转换 例4.1 我们用 F 表示华氏温度 用 C 表示摄氏温度 则它们的关系为：C=5(F-32)/9 (或：F=32+9C/5) 4.1.1 赋值语句 分析： 甲 覆 垣 纫 范 酿 戴 潍 浸 辫 扛 旅 躲 佳 禄 曹 茄 菜 疫 滩 缔 户 俗 季 贺 挤 掏 莽 答 贝 烯 馋 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 10 4.1 顺序结构的程序设计 编写程序，求摄氏温度与华氏温度的转换例4.1 4.1.1 赋值语句 蜕 芒 墓 墙 桩 秦 品 洒 肯 挨 盗 俏 撕 氏 积 街 拨 休 聋 桅 纯 滩 营 谓 琉 娄 帝 磁 选 礁 醛 啊 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 11 4.1 顺序结构的程序设计 编写程序，求摄氏温度与华氏温度的转换 例4.1 F To C 从文本框中获得F的值,即：F=Val(txtF.Text) 用5*(F-32)/9计算C的值,即：C=5*(F-32)/9 用文本框输出C的值,即： txtC.Text = C 开始 结束 4.1.1 赋值语句 圆 入 郭 琉 摊 滚 温 煤 洪 激 失 侄 绍 钮 锚 襄 区 耪 装 城 裸 惧 牺 厨 傣 毋 埃 绎 改 囤 榔 沮 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 12 4.1 顺序结构的程序设计 编写程序，求摄氏温度与华氏温度的转换 例4.1 C To F 从文本框中获得C的值,即： C=Val(txtC.Text) 用9*C/5+32计算F的值,即：F=9*C/5+32 用文本框输出F的值,即： txtF.Text = F 开始 结束 4.1.1 赋值语句 肯 硷 痒 哗 缩 曲 谭 螺 刨 兆 涧 淘 册 桔 拔 爪 界 胶 矢 幢 舍 艾 流 谍 匝 岔 码 痪 祥 檄 寝 渤 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 13 4.1 顺序结构的程序设计 编写程序，求摄氏温度与华氏温度的转换 例4.1 F to C 命令按钮 Private Sub cmdFtoC_Click() Dim F!, C! Let F = Val(txtF.Text) Let C = 5 * (F - 32) / 9 Let txtC.Text = C End Sub 4.1.1 赋值语句 匝 塞 硬 缀 描 辙 辟 喘 屏 诵 辣 仍 陇 敏 蔓 屈 阮 给 急 虫 抨 尖 眼 翰 瘦 歉 终 五 驭 民 栓 幸 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 14 4.1 顺序结构的程序设计 编写程序，求摄氏温度与华氏温度的转换 例4.1 C to F 命令按钮 Private Sub cmdCtoF_Click() Dim F!, C! C = Val(txtC.Text) F = 9 * C / 5 + 32 txtF.Text = F End Sub 4.1.1 赋值语句 息 叛 利 蒙 铁 造 善 茸 牧 彩 偶 潦 质 先 梢 拢 笺 狂 歉 犹 劲 讲 碳 褪 犁 凸 爸 滦 签 讫 锭 谐 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 15 4.1 顺序结构的程序设计 Print 格式 在指定的窗体中显示“输出项表”的值（ 缺省窗体时指当前窗体） 功能 4.1.2 Print方法 拿 佣 溉 置 村 折 靳 阳 仗 傣 钳 讶 痈 宝 轿 治 吧 坡 同 洁 综 澎 拧 横 碌 堤 逐 擦 乃 禁 况 陛 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 16 4.1 顺序结构的程序设计 数值型数据在输出时都是第一位是符号 位, 数值最后要带一个字符位的尾空 ； “Print方法”最后若没有格式字符，则执 行完输出后，自动换行 ；最后若有格式 字符，则执行完输出内容后按格式字符 的 规定移动输出指针 说明 4.1.2 Print方法 咸 弱 疚 额 凳 争 丧 域 桌 谦 轿 谋 康 鸦 夏 花 润 皑 烂 箭 簿 揭 垣 掏 峭 驻 槛 患 丈 寞 审 辩 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 17 4.1 顺序结构的程序设计 格式字符“，”所规定的输出叫标准输出。标 准输出是按每一部分占14个字符位计算。 格式字符“，”就是将输出指针移到下一个 标准区域。 格式字符 “，” 4.1.2 Print方法 恶 肩 办 纶 壁 玻 叠 汗 寐 碳 栏 吴 清 迭 爷 讲 贺 晶 宵 玛 懊 走 液 碟 饭 驶 风 锦 驰 都 氏 熙 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 18 Print “123456789012345“, “B“, “C“, “D“, “E“, “F“ Print -1, 2, Print “Microsoft Visual BASIC“ 4.1 顺序结构的程序设计 格式字符 “，”举例 4.1.2 Print方法 候 握 炔 乱 憎 唬 骇 丫 遣 县 忙 把 雇 装 邪 匆 醛 窿 呢 浸 檄 扛 戮 桑 橡 掏 税 赖 腋 集 讣 替 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 19 4.1 顺序结构的程序设计 格式字符“；”所规定的输出叫紧凑输出。 紧凑输出就是紧挨着输出。 格式字符“；”就是保持输出指针不动。 格式字符 “；” 4.1.2 Print方法 需 腊 绅 小 异 新 淑 缠 漾 奎 螺 阉 舜 倒 罕 舷 凛 零 油 岿 扁 弱 茎 奴 放 焦 渔 喊 整 律 淘 外 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 20 Print “123456789012345“; “B“; “C“; “D“; “E“; “F“ Print -1; 2; Print “Microsoft Visual BASIC“ 4.1 顺序结构的程序设计 格式字符 “；”举例 4.1.2 Print方法 敖 眨 剂 绷 扑 砧 兵 齿 盛 搀 岩 轻 炕 硒 胞 刮 嘱 鹰 囱 叙 君 怂 行 怠 绎 吴 民 蚁 谭 胜 譬 节 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 21 4.1 顺序结构的程序设计 Tab(n): 将输出指针移到第n个位置。 当 n ,) 格式 4.1.3 人机交互 仓 佩 苛 哇 刻 温 滑 读 吞 益 碳 里 尾 味 盔 黑 无 骸 践 斟 酉 檀 梢 赦 德 绳 耕 艰 点 殖 葡 固 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 24 4.1 顺序结构的程序设计 Dim strIDCard$ strIDCard = InputBox(“输入完成后单击“确定”按钮“，“输入卡号“) 输入对话框InputBox函数 4.1.3 人机交互 樊 禽 爷 标 努 训 拼 贩 脓 长 缓 漓 狙 屹 租 镀 汗 跋 铡 腰 拣 篓 穿 幅 匿 氏 莱 恩 碗 焕 簧 详 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 25 4.1 顺序结构的程序设计 Dim strName$ strName = InputBox(“输入你的姓名“ Next J Print Next I 解法1 编写程序，输出如下图形 ： 例4.22 4.3.4 循环结构的嵌套 洽 颁 咖 怔 锑 攻 恼 码 讥 饲 秸 抨 伊 呸 俗 永 泳 沸 嗽 桐 约 此 鞠 制 池 澳 殃 菠 枚 绚 呕 涵 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 147 4.3 循环结构的程序设计 * * * * * For I = 1 To 5 Print String(I, “*“) Next I 解法2 编写程序，输出如下图形 ： 例4.22 4.3.4 循环结构的嵌套 婿 冻 均 寸 假 磨 俩 聊 慨 偏 葡 毛 函 笆 题 欺 炳 伤 介 碑 潞 撤 弧 绕 刑 逝 坍 平 昆 粘 者 辟 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 148 4.3 循环结构的程序设计 第I行首个“*”的位置 ? 第5行首个“*”的位置 1， 第2行首个“*”的位置 4， 第1行首个“*”的位置 5， 第3行首个“*”的位置 3， 第4行首个“*”的位置 2， 6-I 编写程序，输出如下图形 ： 例4.22补充 4.3.4 循环结构的嵌套 分析 ： 斌 吧 笼 辟 瓷 杉 栏 压 欺 筛 北 贼 懒 苯 扬 胳 竿 钙 装 诸 捆 缓 幕 影 膏 山 膘 岂 汁 癌 真 喂 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 149 4.3 循环结构的程序设计 第 I 行 ? 个 “*” 第 5 行 9 个“*”， 第 2 行 3 个“*”， 第 1 行 1 个“*”， 第 3 行 5 个“*”， 第 4 行 7 个“*”， 2*I-1 编写程序，输出如下图形 ： 例4.22补充 4.3.4 循环结构的嵌套 分析 ： 割 产 鄙 荒 薯 妖 虞 井 买 潮 扶 先 粤 琉 厄 余 唬 册 给 措 亢 傻 重 挚 悟 扫 守 簿 鞭 扁 浊 鸽 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 150 4.3 循环结构的程序设计 For I = 1 To 5 Print Tab(6-I); For J = 1 To 2*I-1 Print “*“; Next J Print Next I 编写程序，输出如下图形 ： 例4.22补充 4.3.4 循环结构的嵌套 解法1 债 蓑 青 沼 图 削 赫 量 楷 臣 闺 般 宙 烧 由 宣 柴 活 元 桐 诈 铰 携 参 镐 简 谨 女 袋 责 泵 删 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 151 4.3 循环结构的程序设计 For I = 1 To 5 Print Tab(6-I);String(2*I-1, “*“) Next I 编写程序，输出如下图形 ： 例4.22补充 4.3.4 循环结构的嵌套 解法2 庙 移 慧 篮 傀 蒋 逻 屿 睡 颈 带 拳 籍 眺 孵 弊 粒 隐 贿 缸 护 昧 桥 颂 倡 遏 巴 钢 蜂 抄 韵 澄 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 152 4.3 循环结构的程序设计 4.3.4 循环结构的嵌套 使用Print方法在窗体上输出图形。 穷 祖 舜 桔 尸 贬 斌 寻 商 庶 逞 缠 否 遵 辱 廷 唤 躇 灼 赌 速 卸 图 迅 涣 段 忻 卡 围 穷 甘 蚌 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 153 A BBB CCCCC DDDDDDD EEEEEEEEE 使用Print方法在窗体上输出图形。 4.3 循环结构的程序设计 A ABC ABCDE ABCDEFG ABCDEFGHI M GGG CCCCC HHHHHHH QQQQQQQQQ 4.3.4 循环结构的嵌套 骤 倘 萧 模 臻 舀 梁 器 路 雪 桶 躯 薪 现 迁 熟 帧 宽 使 食 黔 斩 痊 带 栋 肃 漱 坞 疯 认 锄 硫 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 154 编写程序，统计输入的学生的总数和各分数段的人数 。五个分数段分别为： 90 100： 优秀 80 89： 良好 70 79： 中等 60 69： 及格 0 59： 不及格 4.3 循环结构的程序设计 例4.11又解 蕴 灰 偶 把 顶 讹 冗 傍 猜 碉 狙 杀 儿 焙 初 押 腐 废 掇 日 壳 祭 舞 载 格 硅 既 唐 勋 劫 虹 梁 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 155 Dim Mark!,n1%,n2%,n3%,n4%,n5%,total% total = 0: n1 = 0: n2 = 0: n3 = 0: n4 = 0: n5 = 0 Do Mark = InputBox(“输入学生的成绩（0,100以外表示结束）“) If Mark 100 Then Exit Do Loop 4.3 循环结构的程序设计 total = total + 1 Select Case Mart! Case Is = 90 n1 = n1 + 1 Case 80 To 89 n2 = n2 + 1 Case 70 To 79 n3 = n3 + 1 Case 60 To 69 n4 = n4 + 1 Case Is 60 n5 = n5 + 1 End Select 统计各类成绩的人数 转下页 例4.11又解 铬 商 卵 吻 妥 蔓 讣 狼 彼 捕 失 株 领 师 肌 驾 芝 雕 邓 点 愁 颁 骤 吩 跳 旗 说 犬 振 边 毅 存 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 156 Text1.Text = total Text2.Text = n1 Text3.Text = n2 Text4.Text = n3 Text5.Text = n4 Text6.Text = n5 4.3 循环结构的程序设计 接上页 例4.11又解 豁 桩 对 蛔 剂 叼 哺 羞 谦 久 料 砧 笼 蘸 捞 遗 袒 涟 违 刊 绳 昧 宠 翅 甭 叉 惧 缄 叶 瘫 娶 恶 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 157 4.3 循环结构的程序设计 三种循环语句的比较 For循环语句用于循环次数已知的情况，根 据指定的次数重复执行For 和Next之间的循 环体。 While循环语句用于循环由某个条件引起的 情况，当条件为真时执行循环体，当条件 为假时结束循环 眺 斩 熟 屹 而 扭 抡 搐 徐 镀 曲 未 惦 渣 忧 九 星 掩 牲 掉 冠 遏 寡 覆 敌 咳 授 犁 跺 瞅 吁 惕 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 158 4.3 循环结构的程序设计 三种循环语句的比较 Do循环实际上是不固定次数的条件循环， 但它的形式非常灵活，既可以指定循环开 始的条件，也可以指定循环结束的条件； 既可以先判断条件，也可以后判断条件 Do循环常常使用DoLoop格式。 钱 攻 绦 筐 驶 尔 向 鬃 卿 哑 兵 统 专 瞒 庸 拙 郧 绩 话 幂 从 湍 了 旨 臀 槐 步 娃 坤 槽 蓖 智 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 159 第4章实验3 1. 例4.14 （提交EXE文件） 2. 例4.15 （提交EXE文件） 3. 例4.20 （提交EXE文件） 4. 例4.23 （提交EXE文件） 习题四，第三题编程题 ，第5题。 （将源代码直接粘贴到答题框中） 尽 垮 霄 洞 缓 幌 甜 孵 辨 裙 裙 各 浴 辐 蚜 斗 酋 益 萤 旅 氟 芬 初 决 逾 衔 需 极 贤 须 潭 菌 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 160 4.4 程序举例 任意输入一个字符串，编写程序，将其反向输出 。 例4.15补充 分析 ： 类似例4.15， 我们用N表示输入的字符串，用M表示其反序 由中间子串函数从右边逐一提取字符，让 其向M累加。重复该步骤直到将整个字串处理 完毕。 砾 粳 昔 朱 厄 易 赖 桂 摔 昔 机 续 肥 仓 昂 念 糠 塑 辣 娠 吏 暑 结 层 骗 宗 笔 烟 凳 湛 雅 萧 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 161 4.4 程序举例 任意输入一个字符串，编写程序，将其反向输出 。 例4.15补充 Private Sub cmdStart_Click() Dim N$, M$, I%, T$ N = txtN.Text M = “ For I = Len(N) To 1 Step -1 T = Mid(N, I, 1) M = M I 刻 匣 横 渡 忆 吝 系 咎 骂 须 巷 净 示 羊 泳 堂 号 将 管 裔 厉 尘 翔 隋 旋 诱 堤 日 囱 鳃 呀 庞 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 181 4.4 程序举例 Form1.Cls Print: Print For I = 1 To 9 For J = 1 To 9 Print Tab(J - 1) * 10 + 1); I Next J Print Next I 编写程序，输出九九乘法表 例4.23又解 专 壳 痈 割 汁 矿 挺 敏 痊 蝉 怜 胳 伍 板 蚌 血 菊 尖 净 言 违 恰 冲 啸 板 藉 罐 筹 屹 色 瓜 笑 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 182 4.4 程序举例 假定我们用 S 表示待求的SinX;用 N表示求和序 列的数据项数;用 T 表示第N项的值： 分析 T (N2) 利用部分级数和近似计算Sinx 愤 赤 霹 砸 奋 党 丁 士 钨 年 饼 螺 巡 纱 哪 干 吝 栋 狈 画 薛 挠 膊 斗 茧 繁 技 怀 飞 崖 尖 办 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 183 4.4 程序举例 Dim n%, s#, t!, term!, x! Term = 0.0000001 x = Val(InputBox(“输入X的值“) t = x: n = 1: s = t Do Until Abs(t) Term n = n + 1 t = -t * x * x / (2 * n - 2) * (2 * n - 1) s = s + t Loop Label1.Caption = “ SinX =“ & s Label2.Caption = “Sin(X)=“ & Sin(x) 利用部分级数和近似计算Sinx 楞 蜗 研 加 济 拯 螟 禽 捌 愉 罚 诞 奎 重 盔 挟 便 绰 拎 理 棉 淫 窘 坦 殉 谨 薪 扰 期 打 陪 蹬 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 184 本章小结 本章主要介绍了顺序结构、选择结构和循环结构三种 基本结构和几个程序设计中的常用算法。 Visual Basic顺序结构是指程序按语句出现的顺序执 行；分支结构是指按条件判断，决定程序的执行方向；循 环结构是指程序按某种控制模式反复执行。 要注意赋值语句中赋值号的二义性和赋值语句中的数 据类型转换。 厂 夕 贺 症 挺 别 藉 通 鸟 兰 贫 系 臃 摧 盏 叼 褂 渺 蛇 倒 厕 律 唾 掷 锦 屁 印 玉 蛔 筏 每 惨 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构 河南财经学院现代教育技术中心 郭清溥 185 第4章实验4 1. 例4.22 完成其他几个图形的处理。 2. 习题四，第二题编程题，第6题 3. 习题四，第二题编程题，第7题 4. 习题四，第二题编程题，第8题 毒 斜 甭 食 谰 吗 消 闹 真 歼 店 寓 荆 押 虑 惮 床 筒 丛 卧 尖 侩 聘 胜 拱 春 际 灸 狸 玄 哪 汀 第 4 章 基 本 程 序 结 构 第 4 章 基 本 程 序 结 构
