沈阳航空航天大学
课程设计任务书
学院：航空宇航工程学院专业：航空维修班级：04030501 学号：2010040305004 题目：教师上课随机点名
一、课程设计时间
2011年3月12日~18日（第2周），共计1周。
二、课程设计内容
教师在每次上课时，需要对学生随机点名，学生信息保存到文本文件或access 数据库中，学生信息至少包括：学号，姓名，点名次数（初始值为0）。
所谓点名，是指将某位同学的姓名和学号显示到屏幕上，则表示该同学被点名一次，并累加点名次数，注意点名的随机性（可使用随机函数）。
用户界面中的菜单至少包括“编辑学生数据”，“开始点名”，“查询学生点名情况”，“退出”4项。
三、课程设计要求
程序质量：
✧贯彻事件驱动的程序设计思想。
✧用户界面友好，功能明确，操作方便；可以加以其它功能或修饰。
✧用户界面中的菜单至少应包括“编辑学生数据”、“开始点名”、“查询学生点
名情况”、“退出”4项。
✧代码应适当缩进，并给出必要的注释，以增强程序的可读性。
课程设计说明书：
✧课程结束后，上交课程设计说明书和源程序。课程设计说明书的内容参见提
供的模板。
四、指导教师和学生签字
指导教师：________ 学生签名：________
五、成绩
六、教师评语
目录
需求分析 (4)
设计分析 (4)
技术要点 (5)
主要界面截图 (9)
图（一）学生点名系统主界面 (9)
总结 (10)
参考文献 (14)
需求分析
教师在每次上课时，需要对学生随机点名，学生信息保存到文本文件或access数据库中，学生信息至少包括：学号，姓名，点名次数（初始值为0）。
1.运用随机函数从数据库中提取学生的数据。
2.对学生的点名情况进行查询，并在用户界面中显
示。
3.对学生的学号和姓名等信息进行编辑，并添加到
数据库中。
设计分析
（1）概述：
通过使用ADO控件建立程序设计与数据库的联系，用SQL语句在数据库中查找，添加和更改数据，运用随机函数，随机地提取学生的数据，体现点名的随机性。
对数据库的信息进行查询，并在用户界面中显示。（2）总体设计：
（3）详细设计：
技术要点
1 数据的写入
将学生新的信息写入到access数据库中，利用Recordset
语句，代码如下:
Private Sub new_Click()
Text1.SetFocus
End Sub
Private Sub Command2_Click()
Adodc1.Recordset.AddNew
If Text1.Text <> "" Then
Adodc1.Recordset("学号") = Text1.Text
Else
Adodc1.Recordset("学号") = "未命名"
End If
If Text2.Text <> "" Then
Adodc1.Recordset("姓名") = Text2.Text
Else
Adodc1.Recordset("姓名") = "未命名"
End If
Adodc1.Recordset("点名次数") = 0 Adodc1.Recordset.Update
2 数据的查询
从数据库中查询学生的数据，运用Recordset 语句，查询学生的姓名，学号，和点名次数，代码如下：
Private Sub search_Click()
Text1.Text = Adodc1.Recordset("学号")
Text2.Text = Adodc1.Recordset("姓名")
Text3.Text = Adodc1.Recordset("点名次数") End Sub
3 数据的随机提取
运用随机函数，随机地从数据库中提取某一个学生的信息（即教师对学生进行点名），代码如下：
Private Sub Command1_Click()
Randomize '保证每次运行时产生不同序列的随机
数
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.MoveInt(Rnd*Adodc1.Record.set.Rec ordCount + 0)
If Adodc1.Recordset.EOF Then End
Text1.Text = Adodc1.Recordset("学号")
Text2.Text = Adodc1.Recordset("姓名")
Text3.Text = Adodc1.Recordset("点名次数") + 1
Adodc1.Recordset("点名次数") = Adodc1.Recordset("点名次数") + 1
End Sub
4 程序的结束
用End语句结束该程序，代码如下：
Private Sub exit_Click()
ask = MsgBox("确认退出" & " ？", vbY esNo)
If ask = 6 Then End
End Sub
主要界面截图图（一）学生点名系统主界面
图（二）学生信息添加窗体主界面
