大一下课程VB程序设计实验要求及报告6.doc

上海立信会计学院本科实验报告班级： 学号： 姓名： 指导教师： 系部： 专业： 实验时间： 实验6 列表框、组合框与过程一、 实验目的1 掌握列表框和组合框的使用2 掌握自定义函数过程和子过程的定义和调用方法3 掌握形参和实参之间的对应关系4 掌握值传递和地址传递的传递方式二、实验要求1 在C:下建立子文件夹“VB实验6”，按照题目要求，在该文件夹下为各题保存相应的文件，如本实验中的第一题，需保存的文件有：工程文件(61.vbp)、窗体文件(61.frm) 及可执行文件（61.exe），本实验中的第二题，需保存的文件有：工程文件(62.vbp)、窗体文件(62.frm) 及可执行文件（62.exe），其余实验依此类推。2 撰写实验过程中出现了哪些问题、错误，你是如何解决的，做一个小结。三、 实验内容：1. 设计一个选课的运行界面，如图6-1（a）所示。它包含2个列表框，左边为可供选择的课程名称，通过Form_Load事件加入，并按拼音字母顺序排序；当单击某门课程名称后，将该课程加入到右边的列表框中，并在左边列表框中删除该课程。当右边课程数已满5门时，不允许再加入并出现如图6-1（b）所示的提示。窗体及所有控件字体默认、大小均为小四。 图6-1 (a) 图6-1 (b)2. 在窗体上建立一个简单组合框，在组合框的文本区输入数字字符，按回车键后加入到组合框的列表区内（非数字则不加入），然后清空文本区，如图6-2（a）所示；单击“交换”按钮后，可将组合框列表区中最小值项目和第0个项目交换；最大值项目与最后项交换, 如图6-2（b）所示。窗体中所有控件字体默认大小。 图6-2（a） 图6-2（b）3. 设计一个点菜程序，当单击“添加到我点的菜单中”按钮时，将组合框“饭店菜单”中选中的菜添加到列表框“我点的菜”中，当单击“添加到饭店菜单中”按钮时，可以将文本框中输入的菜单名添加到组合框“饭店菜单”中，如已存在将不重复添加。要求：设计窗体界面，窗体中所有控件字体默认、大小为小四，并设计代码，初始时文本框、列表框、组合框内容均为空。图6-34. 编写一个子过程ProcMin(a(),amin)，求一维数组a中的最小值amin。要求主调程序在随机产生10个-300 -400之间的数，在窗体上显示所产生的数组中的各元素，通过Form_Load事件加入；调用ProcMin(a(),amin)过程，在窗体上显示数组中的最小值。窗体中所有控件字体默认、大小为小四，效果如图6-4所示。图6-45. 编写一个自定义函数过程MySin(x)，求：。当第n项的值小于|10-5|时结束，x为弧度。主调程序同时调用MySin(x)函数和内部函数Sin(x)，计算x=2时的函数值。要求：通过单击按钮事件在窗体上显示结果，进行比较验证，窗体中所有控件字体默认、大小为小四，效果如图6-5所示。图6-56. 如果一个整数的所有因子（包括1，但不包括它本身）之和与该数相等，则称这个数为完数。如6=1+2+3，所以6是一个完数。编写一个函数IsWs(m)，判断m是否为完数，函数的返回值是逻辑型。主调程序在窗体上输出1000以内所有的完数，通过Form_L