《VB编程实现学生成绩评估》由会员分享，可在线阅读，更多相关《VB编程实现学生成绩评估（6页珍藏版）》请在金锄头文库上搜索。
1、【实验目的】1）掌握VB编程的使用【实验原理】创建VB应用程序有三个主要步骤：1、创建应用程序界面2、设置属性3、编写代码【实验环境】Office 2010【实验步骤】项目准备鼠标右击电脑桌面选择【新建】一Microsoft Excel L作表】,创建新的Excel工作表，修改Excel I作表的表名为“学生成绩评估”。Excel操作双击打开“学生成绩评估”的工作表，在工作表的单元格内输入相应的信息属性,所有的字体全部居中对齐，Al： C1字体进行加粗。如图所示TH/4 3B I受，言暮童生言 S3 v-r ?1 I ,i勇贴板字体闩乂寸开方式ID15ABCDE1姓名成绩等次2张三553李四7
2、74王五955赵六8867在Excel工作表的菜单栏的“视图”项中选择“宏”单击“查看宏”。如图所示开发工具士例100%咬到砂区域绪段涵WS隐藏 口取?由拆分同步澧劫出重设窗匚位置3中保存切奏窗口宏工作区稣匕例M(v)使用辰引用(U)在弹出“宏”的窗口中，输入宏名为“student”，选择宏的位置为“学生成绩评估.xlsx”，点击“创建”。如图所示B成绩55C等次779588工作表会弹出VB编辑界面的窗口。如图所示k(D 燃输(E) tJCSQO 插入(D格式(Q)调试(2)运行(B)工具(D 夕版程序(A)度口也)帮助(H)回，弟心一郭句C 叱写3&行2,列1/BAProjectlJVBAF
3、roject (FUHCRES.VBAProject导生成纬气 Microsoft Excel 对彝O Sheet! (Sheet!)画 Sheot2 CSht2) Sheet3 (Sheet3)松ThisWorkbook&植块心块1inxl模块近|技分类序IBWiIIEnd Sub4学牝豚浒估.xlsx -模垸1 (代码)德用) | 1 studentSub student ()在窗口 “学生成绩评估”中开发代码，对得到学生信息成绩的单元格进行判断,依次将学生的信息展示在单元格中。（输入完代码，关闭或者缩小窗口就可）如图所示/F JJ 肖了-&仃”，列：(通用)了| studentSub s
4、tudent()Select Case Range(B2). ValueCase Is = 90Range (/?C2，Z). Value =优秀Case Is = 80RangeCC23. Value 二良好Case Is = 60Range CC2). Value 二及格Case ElseRangeCC2). Value 二不及格End SelectSelect Case Range(B3). ValueCase Is = 90Range (C3). Value =优秀Case Is = 80Range CC3). Value 二良好Case Is = 60Range (/C3/Z). V
5、alue 二及格0356 RgeCC3O. Value 二不及格End SelectSelect Case Range (，ZB4Z/). ValueCase Is = 90Range (/，C4/?). Value = 优秀Case Is = 80Range (Z/C4，?). Value 二良好Case Is = 60RangeCC4，Z). Value 二及格Case ElseRanged). Value =”不及格End SelectSelect Case Range(B5). ValueCT、一End SelectSelect Case Range(B5). ValueCase Is
6、 = 90Range (C5”). Value =优秀Case Is = 80Range(C5). Value = 良好Case Is = 60Range (Z，C5，Z). Value = 及格CaSe Range(C5). Value 二不及格End SelectEnd Sub打开“学生成绩评估”工作表，切换到“视图”的菜单栏中，右击右上角空白处,选择“自定义快速访问工具栏” O如图所示在弹出的Excel选项”中选择“自定义功能区”，勾选“开发工具”项。如图所示“确认”后“Excel编辑器的菜单栏中会出现“开发工具”项，打开“学生成绩评估”的工作表，在菜单栏中“插入”项选择“形状”中的“圆角矩形”小图标。如图所示页面布局公式 数据 亩阅 视图开发工具B成绩5577表单控件JE U_HAa abl _jActiveX 控件插入写属性佥呻将代码冒执行对话框为睽取国性5者扩展包牛新婢XML书ASI = *在“学生成绩评估”的工作表中随意画一个长方形，“学生成绩评估”工作表会弹出“指定宏”的窗口，选择“student”宏。如图9所示指定宏ULJteJ“确定”后在“学生成绩评估”的工作表中出现上部画的长方形按钮，修改按钮名为“学生成绩评估”。如图所示点击“学生成绩评估”按钮，通过学生成绩对学生进行等次划分。如图所示C18 二R
