- 3
- 0
- 约7.35千字
- 约 45页
- 2016-10-07 发布于重庆
- 举报
《VB》第五课ppt
* * * * * * * * * * * * * * * * * * * * * 4. 应用 * 例5.10 编写一个使用屏幕字体、字号的程序。 5.3 列表框和组合框 本章目录 * 例5.11 使用列表框实现排序、查找、删除。 5.3 列表框和组合框 本章目录 * 例5.12 使用组合框对省和直辖市名称进行管理。 要求: 1. 可添加不重复的各省或直辖市名; 2. 可修改; 3. 按拼音字符顺序有序显示。 5.3 列表框和组合框 本章目录 5.4 自定义类型及数组 * 1. 概念和定义 不同类型信息作为一个整体来描述,通过Type语句实现。 Type 自定义类型名 元素名1 As 数据类型名 … 元素名n As 数据类型名 End Type 本章目录 * 例如,定义一个有关学生信息的类型: Type StudType StudType为自定义类型名 Name As String*5 姓名 Sex As String*1 性别 Age As Integer 年龄 End Type 5.4 自定义类型及数组 本章目录 2. 自定义类型变量的使用 * 定义了自定义类型,就可在变量声明时使用。 Dim 变量名 As 自定义类型名 例如,如下语句: Dim S1 As StudType,S2 As StudType 声明S1、S2为两个同种类型的变量 5.4 自定义类型及数组 本章目录 * 注意: 不要混淆StudType 和S1 ,前者是如同Integer等的类型名,后者为该类型的变量,存储各成员数据。 (2) 自定义类型不能在过程内定义,一般放在标准模块文件中,默认为Public;若在窗体模块的通用声明段定义,必须加Private。 5.4 自定义类型及数组 本章目录 3. 自定义类型变量成员的引用 * 自定义类型变量名.成员名 例如, S1.Name 引用S1变量中的姓名成员 S1.Age 年龄 可利用With语句简化成员引用: With 结构变量对象名 语句块 End With With S1 .Name = 张华 .Sex = 男 .Age = 19 End With 5.4 自定义类型及数组 本章目录 4. 自定义类型数组及应用 * 例5.13 用自定义类型数组查询和显示学生信息。 分析:自定义一个记录类型,由姓名、性别、电话和学校组成,声明一个存放100条记录的数组。 5.4 自定义类型及数组 本章目录 5.5 综合应用 1. 分类统计 将一批数据分类统计,计算每一类中包含的个数。 例如,统计学生成绩优、良、中、及格和不及格人数。 这类问题要掌握分类条件表达式的书写和使用计数变量保存相应的计数。 * 本章目录 A(0) A(1) A(2) A(23) A(24) A(25) A B C X Y Z 例5.14 输入一串字符,统计各字母出现的次数 声明一个具有26个元素的数组A(25),每个元素的值表示对应字母出现的次数。 从输入的字符串中逐一取出字符C,转换成大写字符(不区分大小写),再求得其在数组中的下标。 关键表达式:j=Asc(UCase(c))-65 A(j)=A(j)+1 5.5 综合应用 * 本章目录 2. 数据输入 * 应用:在财务、工程计算中,经常需要对大量的数据进行输入和编辑。 问题: InputBox一次输入一个数据,而后不能修改, 一个文本框也只能输入一项。 改进:可利用文本框、字符串函数通过编程实现。 5.5 综合应用 本章目录 例5.15 在文本框中输入数据,并允许修改和自动识别非数字数据;输入结束将它们按分隔符分离后存放在数组中。 分析: 利用KeyAscii参数过滤非法数据,文本框本身具有编辑功能; 利用Replace函数去除重复输入的分隔符; 利用Split函数将输入的内容分离到数组中。 5.5 综合应用 * 本章目录 思考题 * 1. 怎样声明一维数组? 2. 怎样确定数组中每一维的上界? 3. 怎样引用数组中的一个元素? 4. 如何防止数组越界错误的发生? 5. 怎样定义一个自定义类型? 6. 自定义类型与数组的区别是什么? 本章目录 * * * * * * * * * * * * * * * * * * 第5章 数组和自定义类型 5.1 数组的概念 5.2 数
您可能关注的文档
最近下载
- 2026年湖南高速铁路职业技术学院单招职业适应性测试题库附答案.docx VIP
- 5G网络优化:5G网络性能优化_(2).5G无线接入技术.docx VIP
- 2026年《国企时事政治试题及完整答案.docx VIP
- 山东外贸职业学院单招语文模拟试题及答案.docx VIP
- 2024CSCO头颈部肿瘤诊疗指南.pptx VIP
- 【倍福BECKHOFF】手册:TwinCAT 2 PLC入门教程V2.42.pdf VIP
- 人教版劳动教育四年级下册全册教案.pdf VIP
- (2026春新版)教科版二年级科学下册《1.1 恐龙的故事》PPT课件.pptx VIP
- 2025年烟台南山学院单招综合素质考试题库及答案一套.docx VIP
- 2026年湖南高速铁路职业技术学院高职单招职业适应性测试备考试题及答案解析.docx VIP
原创力文档

文档评论(0)