- 1
- 0
- 约1.15千字
- 约 10页
- 2019-10-03 发布于广东
- 举报
11.1 实训目的 掌握在VBE环境下编写代码的过程。 掌握条件结构程序设计的方法。 掌握if语句及select语句的使用方法。 掌握IIf函数、Switch函数的使用方法。 11.2 实训内容 11.2.1 If语句及IIf函数的使用 11.2.2 Switch函数及Select语句的使用 11.2.1 If语句及IIf函数的使用 1.创建“闰年判断”模块并运行 2.数据验证过程 1.创建“闰年判断”模块并运行 例如:在“图书管理系统”数据库中,创建“闰年判断”模块,实现通过输入框输入某一年,判断是否闰年,判断结果用消息框显示。 2.数据验证过程 例如:打开“图书管理系统”数据库中,在“实训9-5 在窗体添加不同命令按钮”窗体中添加“工龄检查”按钮,编写VB代码,实现按下按钮时工龄0的情况会提示“工龄输入有误!”消息框,否则显示“工龄输入合法!”的消息框。结果如右图所示。 11.2.2 Switch函数及Select语句的使用 1.Switch函数的使用 2.Select语句 1.Switch函数的使用 例如:在“图书管理系统”数据库中: (1)创建简单计算窗体。在窗体上添加标题分别为“x”、“y”、“Max”和“象限”的4个标签控件,在它们后面分别添加“文本框”控件。 (2)在“简单计算”窗体中添加“计算”按钮,实现,当输入“x”和“y”的值时,计算出其中的最大值,并计算出由“x”,“y”组成的点所在的象限。 2.Select语句 例如:创建一个“成绩等级”模块,实现根据成绩给出相应等级。要求:用输入框接受一个成绩,给出相应等级,90到100为优秀,80到90分为良好,70到80分为较好,60至70分为及格,60以下不及格,若成绩大于100或者小于0,提示输入的成绩不合法。 思考及课后练习 1.新建一个窗体,添加X、Y、Z、MAX四个文本框和一个“计算”按钮,编写代码实现当输入X、Y、Z后,单击“计算”按钮,在MAX文本框中显示三个数中的最大数。 2.新建一个窗体,添加X、Y两个文本框和一个“数据交换”按钮,编写代码实现当输入X、Y的值后,单击“数据交换”按钮,交换两个文本框中的值。 3.创建一个模块,用输入框接收一个字符,判断是属于“数字字符”、“大写字母”“小写字母”、“特殊符号”或“其他字符”中的哪一类,并有消息框给出提示。 4.打开“图书管理系统”数据库,在“实训9-5 在窗体添加不同命令按钮”窗体中添加“检验数据”按钮,实现检验数据的功能,当课程的“姓名”输入值为空时,单击“检验数据”按钮,显示“姓名不能为空!”的消息框。 * * 实训11 模块Ⅰ——条件结构 实训目的 实训内容 思考及课后练习
您可能关注的文档
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第1章 数据库基础知识.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第2章 数据库和表.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第3章 查询的设计与使用.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第4章 窗体.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第5章 报表.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第6章 数据访问页.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第7章 宏的创建与操作.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第8章 模块对象和VBA编程.ppt
- Access数据库应用技术 教学课件 作者 张宇 等 (适用于Office 2000) 第9章 数据库系统开发实例.ppt
- Access数据库应用技术 教学课件 作者 訾秀玲 等 access编书课件0-5.ppt
最近下载
- PMO项目管理制度.docx VIP
- 2026年湖南汽车工程职业学院单招职业适应性测试题库带答案详解.docx VIP
- 构棘枝叶中异戊烯基取代香豆素类化学成分研究.docx VIP
- 智算中心建设项目规划方案.pdf VIP
- 新能源储能柜生产线工艺流程.doc VIP
- 【《基于单片机天然气报警系统设计》7400字(论文)】 .pdf
- (正式版)D-L∕T 821-2017 金属熔化焊对接接头射线检测技术和质量分级.docx VIP
- 机动车检测站授权签字人考试试题(含答案).docx VIP
- 《生物质替代水泥窑炉固体燃料技术要求》.pdf VIP
- 广西南宁第十四中学2025-2026学年九年级上学期期中语文试题(含答案).docx VIP
原创力文档

文档评论(0)