2022年VB学生成绩管理系统的设计与实现_课程设计报告.docx

《2022年VB学生成绩管理系统的设计与实现_课程设计报告.docx》由会员分享，可在线阅读，更多相关《2022年VB学生成绩管理系统的设计与实现_课程设计报告.docx（28页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VB 程序设计课程设计报告班 级：资工 10902 班目 录1、课设地目地32、界面设计和功能设计33、系统功能实施124、系统功能设计195、总结和体会28一、课设地目地1. 通过本次课程设计，提高实践动手才能；2. 通过本次课程设计，进一步懂得运算机程序设计地思路与方法；3. 通过本次课程设计，进一步娴熟运用VB 地语言元素和流程掌握语句；4. 通过本次课程设计，达到能娴熟使用各种常见地VB 控件，懂得面对对象地思想；5. 通过本次课程设计，熟识用户界面地设计；6. 通过本次课程设计，熟识数据拜访控件ADO 及相关对象地使用，能基于ADO 控件实现 Access地数据拜访与操纵；二、界面设

2、计和功能设计1、下面地界面为用户登陆界面：用户名和密码均已设定，用户名为 zg，密码为 10902，只有输入正确，然后点击 “登陆“按钮才能进入主界面 .假如用户名或密码三次输入错误，就系统自动退出 . 当你点击 “退出“按钮时，弹出一个对话窗，界面如下：在对话框上点击“是”按钮，就退出系统，假如点击“否”，就该界面不变 .2 、当用户名和密码均输入正确，点击“登陆 ”按钮，进入主界面 “同学成果治理系统 ”界面，该界面是其他子界面地入口，界面如下：3、进入主界面后，点击“同学治理（删除添加） ”，进入同学治理界面，界面如下：该界面上有一个ADO 控件，用于连接数据库，当用户在六个文本框中输入

3、数据时，点击“添加 “按钮，可以将数据录入到数据库中，假如此时点击”删除 “按钮，就刚才输入地数据就会被删除，点击 ”储存 “按钮时，输入地数据就会自动储存在数据库里，点击”返回主窗体“按钮，该窗体消逝，主窗体显现.4、在主界面点击 “各科成果查询 “按钮，显现如下界面：该界面有一个ADO 控件，用来连接数据库，仍有一个DataGrid 控件，用来显示同学成果地查询结果，当用户挑选了要查询地科目和条件后，点击“查询 “按钮，在 DataGrid 控件上就会显示出所查询地结果.下面为输入条件后查询地结果5、在主界面点击 “姓名查询 “按钮后，会显现如下界面：该界面与上一界面相像，在文本框输入要查

4、询地姓名后，点击“查询 “按钮，就会在DataGrid 控件上显示所要查询地结果.下面为输入条件后查询地结果5、在主界面点击 “班级查询 “按钮后，会显现如下界面：在文版框中输入所要查询地班级，DataGrid 控件上就会显示所要查询地结果.下面为输入条件后查询地结果 6、在主界面上点击“各科成果段查询 “按钮后，会显现如下界面：点击 “运算分数段统计 “按钮后，就会显现所要查询地结果.下面为查询地结果7、在主界面点击 “排名 “按钮后，显现如下界面：在该界面上点击 “排名 “按钮后，在DataGrid 控件上会显示出按成果高低排名地结果，点击” 清除排名 “按钮后，刚才结果消逝，显示原先结果

5、.下面为所现实地结果 8、在主界面点击 “统计直方图 “按钮后，显现如下界面：在该界面点击各个按钮后，就会显现与之相关科目地成果统计直方图，下面为查询地结果9、在主界面点击 “优等生 “按钮后，显现如下界面：点击按钮查询后，结果就会在界面上显示出来.下面为所查询地结果 三、系统功能实施以上展现地是系统地全部界面，怎样才能让这全部地功能实现呢？数据库和地使用便是其中地关键.ADO 控件1 、建立如下数据库学号、姓名、班级、英语、数学、VB、总分、排名 2、建立如下图地全部界面：3、 ADO控件和 DataGrid控件以及数据库地连接步骤：（这一步在设计界面地同时完成）（ 1）、如何加载ADO 控

6、件：步骤 1：步骤 2：步骤 3：各个界面地 ADO 控件如何连接数据库（分两步）： 步骤 1：如下面界面中地 5 个步骤步骤 2：选中 ADO 控件 Adodc1，点击鼠标右键挑选属性，然后界面设置如下：控件绑定数据库地字段操作说明：属性设置说明：下面以学号为例，姓名、班级等都可参考此.将学号对应地文本框Text1 连接 Adodc1 显示数据库中地学号，需要设置DataSource 和 DataField 两个属性 ,第一选中Text1 文本框，并进行下面地两步操作，即可绑定数据库地学号字段.设置 DataSource:设置 DataField:（ 2）、如何加载 DataGrid 控件控

7、件 DataGrid，可以实现数据地批量处理，该控件在控件库MicrosoftDataGrid Control6.0 中.说明： DataGrid 控件属性设置四、系统功能设计系统功能地设计，其核心就是程序代码地编写过程，如何让让系统更加完善、界面更加友好呢，这就得益于代码地编写.以下为各个界面所对应地代码该界面代码如下：Private Sub Command1_ClickIf Text1.Text = zg And Text2.Text = 10902 Then mainfrm.Showdlfrm.Hide ElseMsgBox 用户名或密码错误,请重新输入 , vbMsgBoxSetFor

8、eground, 系统提示！ End IfStatic t As Integer t = t + 1If t = 3 Then End End SubPrivate Sub Command2_Clicka = MsgBox确定要退出本系统吗？, 3 + 32 + 256, 系统提示！ If a = 6 ThenUnload Me End IfEnd Sub该界面代码如下：Private Sub Command1_Click xsglfrm.ShowEnd SubPrivate Sub Command10_Click ydsfrm.ShowEnd SubPrivate Sub Command3_

9、Click jszffrm.ShowEnd SubPrivate Sub Command4_Click pmfrm.ShowEnd SubPrivate Sub Command5_Click zftjtfrm.ShowEnd SubPrivate Sub Command6_Click cjcxfrm.ShowEnd SubPrivate Sub Command7_Click xmcxfrm.ShowEnd SubPrivate Sub Command8_Click bjcxfrm.ShowEnd SubPrivate Sub Command9_Click gkcjfrm.ShowEnd Sub

10、该界面代码如下：Private Sub Command1_Click Me.Adodc1.Recordset.AddNew End SubPrivate Sub Command2_ClickIf Me.Adodc1.Recordset.RecordCount = 0 Or Me.Adodc1.Recordset.EOF Then Exit SubEnd IfMe.Adodc1.Recordset.Delete Me.Adodc1.Recordset.MoveNextIf Me.Adodc1.Recordset.RecordCount = 0 Then Exit SubEnd IfIf Me.A

11、dodc1.Recordset.EOF Then Me.Adodc1.Recordset.MoveLast End SubPrivate Sub Command4_Click Me.Adodc1.Recordset.Save End SubPrivate Sub Command5_ClickUnload Me mainfrm.Show End Sub该界面代码如下： Dim kc_条件 As String Dim kc As StringPrivate Sub Command1_Click kc_条件 = Me.Text1Me.Adodc1.RecordSource = select * fr

12、om stu where + kc + + kc_条件Me.Adodc1.Refresh End SubPrivate Sub Form_Load kc_条件 = =92kc = vbEnd SubPrivate Sub Option1_Click kc = VBEnd SubPrivate Sub Option2_Click kc = mathEnd SubPrivate Sub Option3_Click kc = EnglishEnd Sub该界面代码如下：Dim kc_条件 As StringDim kc As StringPrivate Sub Command1_Click kc_条

13、件 = Me.Text1Me.Adodc1.RecordSource = select * from stu where Me.Adodc1.RefreshEnd SubPrivate Sub Form_Load kc = nameEnd Sub+ kc + = + kc_条件 + 该界面代码如下：Dim kc_条件 As StringDim kc As StringPrivate Sub Command1_Clickkc_条件 = Me.Text1Me.Adodc1.RecordSource = select * from stu where + kc + = + kc_条件+ Me.Ado

14、dc1.RefreshEnd SubPrivate Sub Form_Loadkc = classEnd Sub该界面代码如下：Private Sub Command1_Click Dim vb_A As IntegerDim vb_B As Integer Dim vb_C As Integer Dim vb_D As Integer Dim vb_E As Integer Dim Math_A As Integer Dim Math_B As Integer Dim Math_C As Integer Dim Math_D As Integer Dim Math_E As IntegerD

15、im English_A As Integer Dim English_B As Integer Dim English_C As Integer Dim English_D As Integer Dim English_E As IntegerMe.Adodc1.RecordSource = select * from stu where vb=90Me.Adodc1.Refreshvb_A = Me.Adodc1.Recordset.RecordCount Me.Text1 = vb_AMe.Adodc1.RecordSource = select * from stu where vb=

16、80 and vb=70 and vb=60Me.Adodc1.Refreshvb_D = Me.Adodc1.Recordset.RecordCount Me.Text4 = vb_DMe.Adodc1.RecordSource = select * from stu where vb=90 Me.Adodc1.RefreshMath_A = Me.Adodc1.Recordset.RecordCountMe.Text6 = Math_AMe.Adodc1.RecordSource = select * from stu where math=80 and math=70 and math=

17、60 Me.Adodc1.RefreshMath_D = Me.Adodc1.Recordset.RecordCount Me.Text9 = Math_DMe.Adodc1.RecordSource = select * from stu where math=90 Me.Adodc1.RefreshEnglish_A = Me.Adodc1.Recordset.RecordCountMe.Text11 = English_AMe.Adodc1.RecordSource = select * from stu where english=80 and english=70 and engli

18、sh=60 Me.Adodc1.RefreshEnglish_D = Me.Adodc1.Recordset.RecordCountMe.Text14 = English_DMe.Adodc1.RecordSource = select * from stu where english=90 ormath+english+vb/ 3=85 andmath=100or english=100or vb=100 orvb+english+math/ 3=85 and vb=95 and english =95or english=95 and math=95or math=95 and vb=95

19、 and mc=60 and english=60 and math=60Me.Adodc1.Refresh End Sub五、总结和体会想来，当时那会儿听说要搞 vb 课程设计地时候，我可是相当兴奋啊，心想，学地东西终于可以用一用了 .并且这次地 Vb 课程设计要连续两周地时间，主要是用 vb+access 相关地学问来实现同学成果和信息地治理 .这对于我们这种初次接触这种东西地人来说，仍真是有难度，假如不是老师给了我们足够地模板和样例，我想我仍真一时半会儿，不知道从哪里下手，好在功夫不负有心人，经过几天时间地摸索和操作，这个同学成果治理系统地雏形最终是显现了，虽说功能不太完善，但仍是能满意

20、基本要求，这让我很是欣慰 .两周地时间并不长，一晃就到了，课程设计也要画上句号了 .在这一段时间里里，不能说我地 vb 编程才能有了多么大地提高，多么大地飞跃，但我敢说我对 vb 和数据库相关地知识有了更加深刻地明白和体会，总结起来主要有以下几点：1、想要用 vb 做出好地东西来，肯定要勤动手，不能光看，由于好多错误凭看是看不出来地，只有通过自己不断地操作和修改，才能对vb 地语法结构和流程有自己独到地懂得；2、在编程和调试地过程中，总会显现一些意想不到地问题.我发觉并不是每一个问题都能从资料中得到解决方法，有些问题是无法预料地，这个时候就得靠自己去分析了，你必需得特别地细心，一步一步地进行调

21、试和修改，而且不能急，往往有地错误就是在你急躁地时候从你眼皮底下溜过去地，这样又得重新检查，到头来，既费时又费劲，实在不行，仍可以和同学一起进行争论；3、在写代码地时候，肯定要养成良好地语法习惯，对窗体和控件地name 属性和 caption属性，要尽量习惯用相对应地英文单词地缩写或简写，由于这样便于自己地查找和修改， 仍有就是在写代码地时候，不要图简洁，一些语法结构总是不写全，老是用最简洁地势式，假如你对 vb 语法结构很熟地话，这没问题，但对于我们这样地初学者来说，肯定不要这样，由于时间长了地话，对一些复杂一点地程序懂得起来会很吃力地，而且对其地运行 过程地明白不能达到透彻；4、在数据库地操作部分，肯定检验一下数据源地连接胜利与否，仍有就是在控件与数据库连接地时候，不要忘了每个控件地datasource 属性和 datafield 属性，要确保其于数据库地胜利连接 .经过本次地 vb 课程设计，让我对vb 地软件开发流程，整体筹划发面有了肯定地明白和提高，虽说我地专业并不是运算机或者软件工程相关地专业，但我对vb 编程地热忱丝毫不弱，我信任有了这次地经受，对我以后vb 地学习有很大地帮忙，并祝我在vb 或者其他类型地运算机语言地编程道路上走得更远.