| 标题 | 地面气象考试练习系统 |
| 范文 | 王晓东 摘 要： 随者气象事业的进步和计算机的普及，一些传统的纸、笔考试学习形式变得效率低下，计算机答题形式将会成为未来学习考试的主要方式。地面气象业务考试系统是使用 Microsoft公司的 VB.NET开发工具，结合Access 2003数据库开发的，该软件能够实现考试的自动选题、答题、记分、计时基本功能。 关键词： 计算机;数据库;考试 1 绪论 气象业务工作是一项对专业知识有较高要求的工作，地面气象观测员需要经常学习各种相关业务知识，才能更好的胜任地面观测工作，为此气象业务各级部门非常重视业务学习，各级领导想方设法加强对观测员进行学习培训，并且经常会组织业务知识考试，督促观测象员的学习，但考试基本还是传统的手工纸、笔答题方式，这种考试方式需要组织者敏思苦想地出题，还要打印试卷、手写答题、最后载阅卷评分，共四个步骤，浪费出题人和答题人的时间，学习效率不高，还会造成纸张的浪费。计算机模拟考試相对于纸面考试而言具有：省时，省力，存储方便等优点，所以已经被越来越多地应用到各种考试当中。因此，开发这样一套系统软件成为很有必要的事情。 2 项目的功能需求分析 考试系统首先要有自动出题的功能，并且每次出题都不能相同，为发挥计算机答题优势，目前系统只设计了判断题和单项选择题，（1）答题功能：用户只需要用鼠标选择答案，并对答过的题目进行标识，在交卷前可以检查答过的题目并对未答的题目补答，答完题后在确认交卷后方可交卷，并且一次考试中只能进行1次交卷，（2）记分功能（3）答完题并交卷后，显示错误题目标识功能，同时显示正确答案，方便答题人通过答题系统进行学习。（4）计时功能。 3 编程环境的选择 本系统在WINDOWS环境下运行，使用的设计工具软件为VB.NET。该编程工具软件，包括一组丰富的类，能够编写复杂的应用程序，允许使用WINDOWS窗体创建应用程序和用户界面，并且可以使用ADO.NET访问数据。ADO.NET是Microsoft.NET平台中提供数据访问服务的接口，是数据库应用程序和数据来源见的沟通桥梁。通过这个接口可以方便地访问数据库。使用的数据库软件工具为ACCESS数据库。 4 数据库设计 4.1 数据库构成 本系统设计一个“题库”数据库，数据库包含2个数据表，分别为“选择题表”、“判断题表” 4.2 数据库的维护 可以设计专门的表单界面，然后把数据库绑定到窗体控件，通过控件来完成对数据库的维护，也可直接在ACCESS数据库软件中打开数据库表，进行数据库的维护。 5 设计实现 （1）通过VB.NET创建窗体，然后在窗体中添加相应的控件。 （2）建立系统与数据库的连接，为增加系统灵活性，采用了通过代码来连接数据库的方法，主要用了ADO.NET名称空间中的OleDbconnection、OleDbDataAdapter、DataSet类，为此使用前必须导入System.Data.OleDb、System.Data和System.Windows.Forms名称空间。当主窗体被加载时，建立起数据库与系统的连接，在连接数据库的同时，还利用了SQL语句中的Select语句，从题库数据库中的 “选择题”和“判断题” 两个数据表选取了20道判断题，40道选择题。每次选取的题目时，使用了随机函数Randomize（）和然Rnd（），这样可使每次选到的题目各不相同。分数设置：选择题2分，判断题1分，60道题共100分。利用Timer控件进行记时控制。选项按钮使用Button控件。 （3）系统主界面如下图，这是交卷后的界面，界面中显示有答对的题目，显示颜色是绿色，也有答错的题目，显示的是红色，还有答错题目的正确答案。左上角有得分和答题时间，交卷按钮此时已隐藏。 （4）设计关键代码。连接数据库代码如下： Public Sub GetConnected（） '创建一个OleDbConnection dim strCon As String = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source =C：＼＼Documents and Settings＼＼Administrator＼＼My Documents＼＼题库.mdb" Dim myConn As OleDbConnection = New OleDbConnection（） myConn.ConnectionString = strCon Randomize（） Dim strCom1 As String = "SELECT top 40 * FROM 选择题 ORDER BY rnd（-（编号+" & Rnd（）& "））" Dim strCom As String = "SELECT top 20 * FROM 判断题 ORDER BY rnd（-（编号+" & Rnd（）& "））" myDataSet =New DataSet（） myConn.Open（） Dim myCommand1 As OleDbDataAdapter = New OleDbDataAdapter（strCom1，myConn） Dim myCommand As OleDbDataAdapter = New OleDbDataAdapter（strCom，myConn） myCommand1.Fill（myDataSet，"选择题"） myCommand.Fill（myDataSet，"判断题"） myConn.Close（） End Sub 数据库数据与控件的绑定代码如下： Label2.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"判断题.题目内容"）） Label11.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"判断题.正确答案"）） Label1.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"判断题.编号"）） Label5.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"判断题.备选答案A"）） Label6.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"判斷题.备选答案B"）） Label4.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.题目内容"）） Label3.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.编号"）） Label7.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.备选答案A"）） Label8.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.备选答案B"）） Label9.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.备选答案C"）） Label10.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.备选答案D"）） Label12.DataBindings.Add（New Binding（"Text"，Me.myDataSet，"选择题.正确答案"）） 6 结语 通过对地面观测员学习考试系统较长时间测试，软件在WindowsXP环境下运行稳定，可靠，基本能实现项目要求的主要功能，但在界面美观方面，和增加题型方面有待完善。 参考文献： [1]黄淼云，王永毅.Visual Basic.NET 管理信息系统设计与实现.北京：清华大学出版社，2002. [2]吴逸贤，吴目诚.精彩Visual Basic.NET 2003程序设计.北京：中国水利水电出版社，2005. [3]巴市业务科，地面气象业务学习题库.2010. |
| 随便看 |
|
科学优质学术资源、百科知识分享平台，免费提供知识科普、生活经验分享、中外学术论文、各类范文、学术文献、教学资料、学术期刊、会议、报纸、杂志、工具书等各类资源检索、在线阅读和软件app下载服务。