一、总体功能设计
学生选课系统是直接与学生进行选择教学实验课程有关的信息系统。系统信息的共享是通过一个统一的数据库的存取来实现的。学生选课信息管理系统的主要功能如下。
1.用户登录模块。这个系统包括用户登录、添加用户、用户密码修改三部分。通过数据库表登记合法用户，在VB中访问数据库表来核对检查用户身份，通过定义不同的视图有选择地授予他们许可权，提高数据库数据的安全性。
2.信息管理系统模块。这个管理系统包括学生信息管理系统、教师信息管理系统、课程管理系统三个模块。可以完成学生信息、教师信息和课程信息的添加、修改、删除功能。输入学生、教师及课程的一些基本情况信息，输入到计算机中就可以为所需要的地方读取。
3.选课管理系统模块。这个管理系统包括学生选课信息管理系统和教师选课信息管理系统两个模块，可以完成学生选课信息和教师选课信息的添加、修改、删除功能。学院中的教师可以根据学校及教务处的安排制订教学计划，选择任教课程。学生根据实验课程及自身兴趣通过下拉式列表框选择课程，系统自动根据所选课程列出该课程的所有任课教师供学生选择。
4.查询系统模块。这个系统包括学生信息查询、教师信息查询、学生选课信息查询、教师选课信息查询四个模块，可以完成信息的查询。学生、教师可以按照多种方式对整个选课系统中有关学生选课信息、教师选课信息的情况进行查询。
5.打印模块。对学生选课信息和教师选课信息的浏览和打印。
二、数据库设计
学生选课系统的数据库建立了Selectclass.sql库文件，由6张表组成。
1.password（用户登录表）：用户名、密码、权限。
2.studentinfo（学生信息表）：学号、姓名、性别、出生日期、电话、地址、备注。
3.techerinfo（教师信息表）：教师号、教师名、职称、电话、备注。
4.courseinfo（课程信息表）：课程号、课程名、学时、学分、备注。
5.choice（学生选课表）：学生选课编号、学号、姓名、课程号、课程名、教师编号、教师名、选课时间、备注。
6.courseteache（r教师选课表）：教师选课编号、教师号、教师名、课程号、课程名、备注。
三、系统界面设计
1.用户登录界面。进入系统前，需要进行身份验证，通过此窗口输入个人信息以验证身份。
2.主界面是将系统提供的各种操作集中呈现于此窗口中。主界面的菜单项：系统功能模块的调用是通过主界面上的菜单实现的。
3.学生基本信息界面。提供对学生基本信息的添加、修改、删除功能。
4.学生选课信息界面。对学生选课信息进行管理，选择课程后，自动选择该课程的任课教师。
5.学生基本信息查询界面。对学生基本信息进行浏览、查询，并可按照学生学号、姓名、出生日期、地址等信息进行查询。
四、关键技术
1.使用ADO连接数据库。数据库的动态连接可以通过对象连接也可以通过控件连接。使用ADO对象访问SQLSever数据库，要在程序中直接声明或新建ADO对象，然后调用ADO对象的属性和方法即可。引入ADO对象：选择菜单【工程】→【引用】命令，进入界面选择“MicrosoftActiveXData Object2.7Library”；声明并创建ADO对象：Private my-conn as new adodb.connection，Private myrecord as new adodb.recordset，Set myconn = New ADODB.Connection Myconn.con-nection="Provider=SQLOLEDB.1；PersistSecurity；Info=False；UserID=sa；InitialCatalog=selectclas；Data Source=LX24_013"，myconn.Open myconn.connection，Set myrecord = NewADODB.Recordset。使用A控件访问数据库主要设置Con-nectionstring属性，在连接资源中选择数据资源名称，然后选择相应数据源名即可访问SQLServer数据库。单击【工程】→【部件】选项，在弹出的列表中选中（Microsoft ADO DataControl）添加Adodc控件到工具箱中；设置Adodc控件的Con-nectionstring属性连接到相应的数据库资源中。
2. 使用绑定控件录入、修改、删除记录。录入
recordset.addnew fildlist，values，myrecord.AddNewmyrecord.Fields（"学号"）=Text1.Text，myrecord.Fields（"姓名"）=Text2.Text，myrecord.Fields （"性别"）=Combo1.Text，myrecord.Up-date，myrecord.Close。修改。recordset.update fildlist，value，sql = "update studentinfo set 姓名='" & Text2.Text & "'，性别='" & Combo1.Text & "'，出生日期='" & Text6.Text & " '，电话='" & Text3.Text & "'，地址='" & Text4.Text & " '，备注='"& Text4.Text & " ' where学号='" & Text1.Text & " '"，my-conn.Execute sql。删除。del = "delete from studentinfowhere 学号='" & Text1.Text &"'"，myconn.Execute del3.使用recordset对象检索记录。成功的数据库应用都使用connection对象建立连接并使用recordset对象处理返回的数据，通过“协调”两个对象的特定功能可以开发出几乎可以执行任何数据处理任务的数据库应用程序。例如执行数据库的查询操作 ：dim rs1 as new adodb.Recordset，setrs1=new adodb.recordset，txtSql="SELECT * FROM passwordWHERE 用户名='"&Text1.Text &"'，rs1.Open txtSql，myconn，adOpenDynamic，adLockOptimistic，adCmdText
参考文献：
[1]四维科技，赵斯思.VisualBasic数据库编程技术与实例[M].北京：人民邮电出版社，2004.
[2]萨师煊，王珊.数据库系统概论[M].北京：高等教育出版社，2006.
