试验E 数组和自定义类型
一、实验目的
1. 掌握数组的声明、数组元素的引用。 2. 掌握固定长度数组和动态数组的使用差别。 3. 掌握数组常用的操作和常用算法。 4. 掌握列表框和组合框的使用。 5. 掌握自定义类型及数组的使用。 二、实验内容
1. 随机产生30~100（包括（30、100）的10个正整数，求最大值、最小值、平均值，并显示整个数组的值和结果。
2. 已知6 个学生的成绩，通过数组赋初值的方法，利用String函数，以每5分为一个“◆”显示，并显示学生的成绩。
3. 随机产生20个学生的成绩，统计各分数段人数。即0~59、60~69、70~79、80~89、90~100，并显示结果。产生的数据在Picture1显示，统计结果在Picture2显示。
4. 随机产生10个2位数，按从大到小递减的顺序排列，并显示排序结果。
5．参照教材例5.3，在通用声明段声明两个数组，利用随机函数形成如下两个数组：
A=要求：
， B=
①以下三角形式显示A数组、上三角形式显示B数组。 ②求A数组主对角线元素之和和B数组副对角线元素之和。
6. 输入整数n，显示出具有n行的杨辉三角形。图E.5显示n=8的效果。
7. 设计一个选课的运行界面如图E.6所示。它包含2个列表框，左边为已开设的课程名
称，通过
Form_Load事件加入，并按拼音字母排序；当单击某课程名称后，将该课
程加入到右边列表框，并在左边列表框中删除该课程。当右边课程数已满加入。
5门时，不允许再
8. 窗体上建立一个简单组合框，在组合框的文本框输入数字字符，按回车键后加入到组合框
的列表框内，如图所示；单击“交换”按钮，将列表框中最小值项目和第换；最大值项目与最后项目交换。
E. 80个项目交
9. 提供在窗体上显示的以汉字开头的字体名称，并显示该名称所对应的字体样式。
10. 自定义类型数组的应用。要求：
①自定义一个职工数据类型，包含职工号、姓名、工资三项内容。在通用声明段声明
一个职工类型的数组，可存放5个职工的数据。
②窗体中设计3个标签、3个文本框、2个命令按钮和1个图形框，文本框中分别输入
职工号、姓名、工资；当单击“新增”按钮时，将文本框输入的内容添加到数组的当前元素中；当单击“排序”按钮时，将输入的内容按工资递减的顺序排列，并在图形框显示。程序运行界面如图E.11所示。
习题五
1、 在VB6.0中，数组的下界默认为0，用什么语句可以重新定义数组的默认下界？
答：指定数组的默认下界 Option Base 1
2、 要分配存放12个元素的整型数组，下列数组声明（下界若无，按默认规定）哪些符合要求？
（1） n=12
Dim a(1 To n As Integer
答：Dim 语句中的下标只能是常量，不能是变量。 （2） Dim a%( n=11
ReDim a(n 答：正确
（3） Dim a%[2,3] 答：VB中数组下标用圆括号，应为（） （4） Dim a(1,1,2 As Integer 答：正确