基于VB的学生公选课选课系统的设计与实现.docVIP

课 程 设 计 指 导 书 课 程 程序设计 班 级 11自一 姓 名 杜康 学 号 目录 一、功能描述………………………………………………3 二、概要设计………………………………………………4 三、各功能模块的详细设计及详细说明…………………6 四、运行效果………………………………………………9 五、小组分工完成的任务…………………………………12 六、心得体会………………………………………………13 七、附录程序………………………………………………14 八、参考文献………………………………………………22 一、功能描述： 1、进入登录界面，输入正确的用户名和密码，即可成功登录，进入公选课课程界面。若输入错误，则可重新输入，否则退出系统。对于菜单项。点击“学生登录”，则清除当前用户和密码信息，可以重新输入新的用户名和密码；点击“公选课课程信息”，则可浏览公选课课程信息界面；点击“个人选课信息”，则可进入个人选课信息界面进行相应操作。 2、进入公选课课程信息界面，可以按课程名，课程教师，开设学期，学分等关键字查询浏览数据库（允许模糊查询），例如，在“课程名”里输入“自行车”，然后点击查询，则会显示所有与“自行车”相关的课程；在“学分”栏输入“5”，则会显示所有学分为5的公选课课程信息。按课程教师，开设学期查询方法类似。另外，可以对课程信息进行分页查询，点击第一个，即可显示公选课课程信息中的第一条记录；点击下一个，即可显示公选课课程信息中的下一条记录；点击上一个，即可显示公选课课程信息中的上一条记录；点击最后一个，即可显示公选课课程信息中的最后一条记录。点击“返回上一页“， 即可返回到登录界面。 3、点击个人选课信息，进入学生选课信息界面，每名学生可以根据输入自己的学号，点击查询按钮查看到数据库中自己的公选课选课情况，，并实时显示已选的课程，如若改变主意想要退选，选中自己的选课信息后点击退选按钮则可以删除自己在数据库中已选的课程信息。点击返回上一页按钮，则可以返回到公选课课程信息界面进行相应操作。点击“首页“按钮，即可返回到登录界面。点击退出系统，则退出应用程序。 二、概要设计：设计流程框图： 主流程图： 公选课课程信息子流程图： 学生个人选课情况查询子流程图： 三、各功能模块的详细设计及详细说明： 1、对于用户登录界面，首先设置Data控件和Access数据库之间的连接方式，一种是在程序中使用语句实现，Data1.DatabaseName=APP.path+”\Course.mdb” Data1.RecordSource=”Student”;另一种是将数据库与工程放在同一目录下，直接连接。本次使用的是直接连接方式，如下图所示。然后使用Data数据控件中的Data1.Recordset.FindFirst和Data1.Recordset.Fields来查找数据库中满足与输入的用户和密码相匹配的记录，若找到，则提示“密码正确”，进入下一个界面，否则提示“密码错误”，重新输入用户名和密码。通过Unload Form指令来释放内存，关闭窗体，从而实现退出系统。利用Form1.Hide Form2.Show实现点击按钮之后，关闭Form1并从Form1切换Form2。 Data控件与Access连接方式图 用户登录界面 2、在工程—部件中，添加Data控件、ADO控件、MsFlexGrid控件，然后添加到窗体中。建立四个Option1控件数组，其属性窗口中的index分别为0、1、2、3，并把它们和MsFlexGrid控件属性DataSource均设置为Data1。然后通过Option1.Item(0、1、2、3)是否等于True来判断哪一个控件被按下，从而利用If___End If指令进行条件查询。使用Data1.RecordSource = select * from 课程信息表 where字段名 like* Text（）.Text *语句来从数据库中模糊查询与输入信息相匹配的记录，并将其显示在MsFlexGrid中。用Data1.Refresh指令将数据库及时的更新。利用Form2.Hide Form3.Show来关闭Form2并切换到Form3。将分页查询使用的4个Text控件的DataSource属性均设置为Adodc1。把Data1和Adodc1的Visible属性均设置成False.然后定义4个按钮“第一个”“上一个”“下一个”“最后一个”以实现分页浏览。