【VB开源代码栏目提醒】：网学会员VB开源代码为您提供vb期末大作业 - 综合课件参考，解决您在vb期末大作业 - 综合课件学习中工作中的难题，参考学习。

    

Vb大作业 程序设计目的 将理论教学中涉及到的知识点贯穿起来对不同的数据类型、程序控制结构、数据结构作一比较和总结结合设计题目进行综合性练习以达到对所学知识熟练掌握、灵活应用的目的。

     1对于自己所设想的vb程序进行分析、理解以做到思路清晰。

     2掌握自顶而下的设计方法将大问题进行模块化分解领会结构化程序设计的方法同时深刻认识到面向对象程序设计与面向过程程序设计的根本区别。

     3熟练掌握VB常用控件的使用灵活运用各种数据类型。

     4学会运用函数进行程序设计。

     5进一步掌握在集成环境下调试程序和修改程序的方法和技巧。

     程序设计思路 了解六十个学生的成绩情况 程序界面包括一个Form显示六十个学生的成绩情况包括六十个学生的最高分、最低分、平均分、及格人数和优秀人数五个Label显示各个项目情况的标题对应五个text作为学生成绩情况显示框两个command按钮分别用于开始输入六十个学生的成绩和退出程序。

     1.在窗体中添加五个label五个textbox和两个command按钮。

     2.编辑各个控件属性。

     3.编辑程序代码运用循环结构输入学生成绩并使用数组使程序设计和运行简单化。

     4.试运行vb程序对错误代码进行调试和完善使程序可运行并符合逻辑思路。

     代码注释 Private Sub Command1_Click Dim val1 To 60 As Integer Dim pass good i j temp sum 输入60个学生的成绩 For i 1 To 60 vali InputBox输入第 i 个学生的成绩 计算总成绩 sum sum vali 计算及格大于60分人数和优秀大于90分人数 If vali 59 Then pass pass 1 If vali 89 Then good good 1 Next i 对60个学生成绩按从小到大排序 For i 1 To 60 For j i 1 To 60 If vali valj Then temp vali: vali valj: valj temp End If Next j Next i Text1 val1 最低分 Text2 val60 最高分 Text3 sum / 60 平均分 Text4 pass 及格人数 Text5 good 优秀人数 End Sub Private Sub Command2_Click End End Sub 结束程序运行 功能 1.操作项目包括输入数组求数组最大值最小值平均值及格人数和优秀人数。

     2.单击“输入学生成绩按钮”开始依次输入六十个学生成绩根据选择完成一项或多项操作单击“退出”按钮来结束程序的运行。

     3.InputBox完成数组的输入。

     4.最后输出的学生成绩情况数据在文本框中显示。

     源代码 Private Sub Command1_Click Dim val1 To 60 As Integer Dim pass good i j temp sum For i 1 To 60 7 vali InputBox输入第 i 个学生的成绩 输入学生成绩 sum sum vali If vali 59 Then pass pass 1 If vali 89 Then good good 1 Next i For i 1 To 60 For j i 1 To 60 If vali valj Then temp vali: vali valj: valj temp End If Next j Next i Text1 val1 Text2 val60 Text3 sum / 60 Text4 pass Text5 good End Sub Private Sub Command2_Click End End Sub