江苏大学生实践创新项目结题报告 2500字精选word文档 48页.docx
《江苏大学生实践创新项目结题报告 2500字精选word文档 48页.docx》由会员分享,可在线阅读,更多相关《江苏大学生实践创新项目结题报告 2500字精选word文档 48页.docx(37页珍藏版)》请在冰豆网上搜索。
![江苏大学生实践创新项目结题报告 2500字精选word文档 48页.docx](https://file1.bdocx.com/fileroot1/2023-1/26/10159e35-b101-4cf2-a1b7-d8c0b364bd5b/10159e35-b101-4cf2-a1b7-d8c0b364bd5b1.gif)
江苏大学生实践创新项目结题报告2500字精选word文档48页
本文部分内容来自网络整理,本司不为其真实性负责,如有异议或侵权请及时联系,本司将立即删除!
==本文为word格式,下载后可方便编辑和修改!
==
江苏大学生实践创新项目结题报告(2500字)
江苏省大学生实践创新项目
结题报告
项目名称:
项目成员:
指导老师:
学校名称:
项目时间:
大学生实践创新项目结题报告
计算机一级B考试辅导系统设计
一、项目申请背景
随着计算机的普及化,社会对计算机的要求越来越高,因此学校对学生的计算机能力的培养也越来越为重视,一般高职院校必需通过江苏省计算机一级B考试,未通过的学生不能发放毕业证书,对于初高中未普及计算机的学校学生来讲,进入大学后计算机的学习就相对吃力,需要更加努力才能完成此课程,在大学里,由于该课程相对课时少,且又涉及知识面又广,因此学生学习起来相对困难,这就需要有一个能让学生自己的学习的辅导软件,从而帮助学生自学该门课程,计算机一级B辅导系统设计构想便酝酿而成。
作为大学生实践创新项目来说,该系统的内容正好针对在校的学生,通过该系统的设计和题目的制作,可以帮助学生更好的掌握计算机理论知识,通过操作的练习,可以让学生更加熟练地运用计算机。
系统设计、调试以及运用的过程可以让学生掌握一个软件的设计过程,对程序设计有一个充分的认识,课件中的多媒体制作可以让学生了解一个课件中媒体制作的方法,以及如何运用媒体进行教学的理念,让学生了解一个网络教学平台的运作方式。
二、项目可行性基础
该项目主要是利用屏幕录像软件录制操作题的操作过程,并以wmv格式保存下来,存入在网站中,通过windowsmediaplayer来播放。
理论题通过统考系统中的题目截取,并配以答案,也存放于网站数据库中,通过动态网页方式将题目显示在客户端中,学生通过客户端的练习以掌握理论题目,客户端采用VisualBasic程序设计语言进行编写。
不论是VisualBasic还是屏幕录像软件的使用,对于大学生来说,掌握都不是困难,通过老师的相应指导,程序设计及媒体制作可行性相对高,完全可以将该项目完成。
三、项目框架设计
计算机一级B辅导系统主要针对学生使用,由于学生在使用计算机时,往往无法固定在某台电脑上,因此,该系统借用网络服务方式。
首先,在Internet网服务商处申请一个网络空间及访问域名,将相应的媒体文件、理论题数据库及相应的动
态网页存放在网络空间中,学生可以通过域名访问进行相应的注册、问题咨询、客户端下载。
下面是该系统中的设计框架图。
四、项目实施计划
项目要得到很好的实施和完成,就应有一个很好的计划,没有一个计划,实施起来就缺乏目的性、条理性,运作起来就相对困难,为此特制定如下计划:
1.工作分工安排
客户端程序设计:
网页代码设计:
程序及网页审核:
操作屏幕录像:
理论题截取:
理论题答案:
系统测试:
2.项目完成时间安排
网站及域名:
201X年6月
客户端设计:
201X年6月—201X年10月
操作屏幕录像:
201X年6月—201X年1月
理论题截取:
201X年6月—201X年11月
理论题答案:
201X年6月—201X年11月
系统测试:
201X年2月—201X年3月12日
系统修改:
201X年3月—201X年6月
3.项目经费使用安排
程序设计及网页制作:
1200.00
文献资料购置费:
800.00
网站租用及域名:
500.00
计算机耗材:
500
文印费:
800
五、项目实施过程
整个项目的实施过程严格按照计划进行,在实施开始阶段,召开了全体成员会议,根据各个学生的特点,布置了相应的任务,共同商议了域名和网站租用的问题,拟采用作为域名,租用中国数据服务商的网络空间标准Ⅲ。
在工作分配之后,进行了201X春季试卷理论题的截取工作,以文本方式保存,并开始查找和制作答案,同时操作题录像也开始录制,网站代码及客户端程序也开始设计,各方面的工作同时进行。
在201X秋季考试之前,客户端和网站已基本设计完成,将理论题及操作录像导入系统数据库中,并上传到网络空间,通过参加考试的学生进行测试使用,根据使用出现的问题进行修改,完善系统。
在秋季考试结束后,继续进行理论题截取、答案制作以及操作录像的录制。
共完成了14套试卷的操作讲解录像,截取2027道理论题目。
六、项目结果介绍
计算机一级B考试辅导系统共分为三大模块:
客户端,服务网站,管理端。
(一)客户端
客户端是本系统最重要的部分,也是辅导系统最重要的体现,在该模块中,使用者可以进行理论测试和操作题练习,同时也可以进行理论复习和操作录像观看,通过标准答案和操作讲解,使使用者能更好地掌握理论知识和实践操作能力。
为了提高复习效率,系统还可以自动记录下使用者做错的题目,以便下一次进行错误加练,更快地掌握理论知识。
同时系统也要求使用者必须有一个帐号登录,以便更好地掌握各个人的使用情况及学习进度。
为了使大多数的用户使用方便,本系的客户端共开发了WindowsXP、Windows7两个绿色版本,用户在使用过程中,只需要下载相应的客户端程序,直接点击运行,无须安装。
1.客户端登录
客户端程序运行后,系统弹出一个帐号输入界面,使用者输入自己的帐号及密码可以查看到帐号相应的信息,当“可登录数”大于0时系统便可进行直接点击“使用”进入客户端主界面。
登录窗口如下图:
如果登录帐号的密码输入有错,系统将出现密码输入错误的提示,如下图:
当输入密码正确,登录成功后,系统将提示你将从你的帐上扣去一次登录次数,同时也表示你已经使用过系统一次,登录次数多表示学习次数多。
如果帐上的登录次数使用完后,可以到管理端进行帐上充值,这样可以再次使用系统。
提示界面如下图所示:
如果网络不通,又要登录或查询的话,系统会出现下面提示:
此时要检查一下网络情况,确保学习能进行。
2.客户端主界面
身份验证成功后,系统自动进入主界面,在主界面中分别有理论测试、测试评分、错误加练,试题刷新、理论复习、操作讲解、密码修改、系统说明及服务网站功能,使用者可以根据自己需要的项目进行点击学习。
在主界面中间显示的是系统介绍,界面的标题显示的是当前使用者帐号及姓名,下方显示系统的服务电话及QQ号。
3.理论测试介绍
理论测试主要用于测试使用者掌握理论知识情况,系统可以按照设置顺序或随机出题(是否将“按顺序出题”选上),题目包括选择题、填空是和是非题,各题型的数量随机。
理论测试界面模拟了省统考系统的界面显示方式,每次显示一道题,使用进,可以用鼠标点击界面下方的题号,也可以使用“PageDown”或“PageUp
”键进行选题,答案选择可以用鼠
标直接点击,也可以使用键盘ABCD进行答案选择,填空题则直接输入。
4.理论测试介绍
理论评分是对理论测试结果的评判,在测试完毕后,点击理论评分,系统自动对所答的题目进行对错评判,错的分别在下方的题号后面显示“×”,对的显示显示“√”,同时弹出一个对话框显示统计结果,还可以让使用都决定是否将做错的题目加入了错题库中,以便日后进行错误加练时再出现做错的题目,增加对题目的印象。
5.错误加练介绍
错误加练在抽题时首先抽取本帐号中以前出现过错误的题目,如果题目达不到50题,则其它题目再由系统随机抽取补充,如果错误的题目超过50题,则完全抽取的题目为曾经错误的题目。
这样的目的是为了加深对错误题目的印象,更快掌握理论题目。
6.试题刷新介绍
试题刷新是在理论测试结束或错误加练结束后,再由系统进行重新抽题。
抽取题目后自动又进入理论测试界面。
7.理论复习介绍
理论复习共分三大部分,分别是选择题、填空题和是非题,在复习时系统自动按题目录入的时间排序,即最后截出来的题目放在首位,这种排法的原因是:
使用都往往都喜欢从头看到尾,且不是所有使用者都会全部看完,一般情况下都是看前面的题目,这样就保证使用都看到的都是最新的试题,为增加通过率提供一定的保证。
选择题还是一屏显示一道题,填空题和是非题则每屏显示5题,在各题目后面都有标准答案。
理论复习的过程中,使用都可以根据学习情况自己选择复习进度,也可以边复习,边进行理论测试,在理论测试中选择“按顺序出题”便可加深学习印象,更快掌握理论知识。
理论复习的界面如下图所示:
8.操作讲解介绍
本系统目前共录制了14套试卷的操作讲解,分别是201X年春季8套和秋季6
套,在使用
时,先选择试卷,选择后,界面的下方将显示该套试卷的所有操作题目,此时使用者可以用鼠标直接点击题目,系统自动播放该题的操作录像。
播放界面如下图:
本系统的操作录像均采用“屏幕录像”软件制作而成,录像图像清晰,声音清楚,使用者可以自行调制声音大小和播放进度,在看完录像可以直接关闭,也可以点击下一道题目以覆盖当前录像。
如果想一边看录像一边训练,可以点击“下载素材”,系统便弹出如下提示,点击“是(Y)”
,
系统将出现下载界面,如下图,点击链接便可进行下载,如果系统装了迅雷且设置为默认下载工具,可能全出现下载错误。
9.密码修改介绍
密码修改主要是让使用者改变自己的登录密码,在修改时,先输入旧的密码,再输入新的密码,然后再验证一下新的密码,点击修改便可以了。
10.系统说明介绍
系统说明主要是介绍一下本系统的基本情况及小组成员的基本情况。
11.服务网站介绍
通过点击该项,系统自动链接到本系统相应的服务网站,可以让使用都更加了解本系统的其他功能。
(二)服务网站
1.主页介绍
网站的主页上显示的一个Flash横幅,主要显示系统的作用、域名及服务手机号和QQ号,网页下方左边显示的是联系方式,中间显示的系统介绍,右边则显示系统使用的主要问题,在中间的下方,提供了用户注册、信息修改、客户端下载、使用说明、使用录像、帐号使用查看及使用问题和密码找回等功能,网页底部显示的是网站访问量及系统里包含的理论题目。
2.帐号注册
在使用本系统必须使用帐号,因此需要先进行注册,注册可以从网站上进行注册,也可以直接下载客户端,在客户端进行注册。
在注册时,如果有*提示的表示该项必须填写,填写好就可以点击“提交”便可完成。
3.信息修改
信息修改是为了让已注册的信息因某种原因需要更改时而设的,修改时按要求进行填写好后,直接点击“提交”便可完成信息修改。
4.使用记录查看
为了让使用者更加了解自己使用系统情况,可以点击“使用查看”,进入后,在帐号处输入帐号,点击“提交”系统将显示该帐号使用的详细情况,如下图所示:
(三)管理端
1.登录界面
管理端是为了方便教师进行试题输入、帐号充值、问题解答及了解使用情况,因此安全性有一定的要求,需要进行身份验证,登录时,输入管理帐号及登录密码,点击“登录”进行身份验证后,便可进行管理端的主界面。
2.管理主界面
管理主界面包含帐号注册、帐号充值、试题输入、试题答案、使用问题、使用查看等功能,使用时根据所需要的工作点击相应的功能按钮便可完成。
3.帐号注册
当使用者未使用网站注册或客户端注册,而直接要进行充值时使用。
在使用过程中,输入使用者的帐号、姓名、所在班级,点击注册便可完成,同时在左边列表第一行显示注册帐号,如果发现某个无意义的帐号,可以先选中,直接点击删除便可完成。
4.帐号充值
由于系统采用了帐号登录管理方式,因此在使用一段时间后,帐号登录次数将变为0,此时帐号将无法登录,需要进行充值。
充值时,直接输入帐号,按下“Enter”键,系统显示了该帐号的信息,直接输入需要充的次数,点击“充值”便可完成充值,同时左边列表显示充值的情况。
5.试题输入
由于计算机一级B考试理论试题每年都有更新,因此需要对系统的数据库进行充实,就需要进行试题输入,在输入过程中,只需要使用Ctrl+C和鼠标点击便可完成试题截取,截取结束后,点击相应的题型保存便可以了。
6.答案输入
当新试题输入完后,便可进行答案输入了。
首先先点击题型,当列表中出现题目时,便可直接答题了,答完后,点击“上传”便可以完成答案输入。
7.问题解答
该功能主要是为了回答系统使用中常见的问题所设,输入问题及解答内容,点击“保存”
便可,如果是需要修改问题,则先选中所要修改的问题,点击“复制”,将问题复制到输入框中,然后修改后再点击“添加”,再删除原来的便可。
8.使用查看
使用掌握是为了让管理者更好地掌握系统的使用情况,使用该功能时,直接按要查看的条件选择好后,点击“查看”,系统便列出相应的内容。
七、项目主要源代码
(一)客户端
1.登录界面
DimWebFlagAsBoolean
DimConnectTimeAsInteger
PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"_
(ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,_
ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLongPrivateConstSW_SHOW=5
PrivateSubcmdLable_Click(IndexAsInteger)
cmdSelect_ClickIndex
EndSub
PrivateSubcmdSelect_Click(IndexAsInteger)
IfIndex=1Then
IftxtID.Text=""OrtxtPWD.Text=""Then
a=MsgBox("由于您未输入帐号或密码!
只能以浏览者身份进入!
浏览者身份只能看到一套题目理论题,操作题讲解只能看到Word讲解!
",48,"天狼电脑工作室")
ID="浏览者"
UserName="系统测试"
ReDimaByte(0)AsByte
PackBytesaByte,URLEncode("ID=系统测试")
WB1.NavigateServerIP&"computerregister.asp",14,,aByte,vHeaders
frmMain.Show
UnloadMe
Else
a=MsgBox("您确定开始使用系统吗?
点击“是(Y)”后,系统将从您的帐上减去一次登录数,系统进入后,在使用过程中请不要关闭,系统是以登录次数记帐的!
",36,"天狼电脑共管室")Ifa<>6ThenExitSub
WebFlag=True
ConnectTime=0
ReDimaByte(0)AsByte
PackBytesaByte,URLEncode("ID="&txtID.Text&"&PWD="&txtPWD.Text)
WB1.NavigateServerIP&"computerregister.asp",14,,aByte,vHeaders
Timer1.Enabled=True
EndIf
Else
cmdConnect
EndIf
EndSub
PrivateSubForm_Load()
ServerIP="/"
Ver="1.00"
ForI=0To5
lblinformation(0).FontName="宋体"
Next
OnErrorGoToabc
lblRegister.FontName="宋体"
lblNet.FontName="宋体"
Frame1.FontName="宋体"
Label1(0).FontName="宋体"
Label1
(1).FontName="宋体"
cmdLable(0).FontName="宋体"
cmdLable
(1).FontName="宋体"
abc:
EndSub
PrivateSublblNet_Click()
CallShellExecute(Me.hwnd,"open",ServerIP&"index.asp","","",SW_SHOW)
EndSub
PrivateSublblRegister_Click()
CallShellExecute(Me.hwnd,"open",ServerIP&"userregister.htm","","",SW_SHOW)
EndSub
PrivateSubTimer1_Timer()
ConnectTime=ConnectTime+1
IfConnectTime>60Then
a=MsgBox("网络不通!
可能有以下几个原因:
"&vbCrLf&"1.服务器未开通或有错误!
"&vbCrLf&"2.本机未接入到InterNet!
"&vbCrLf&"3.网速太慢,还没有返回消息!
",16,"天狼电脑工作室")
ConnectTime=0
EndIf
EndSub
PrivateSubcmdConnect()
IftxtID.Text=""AndtxtPWD.Text=""Then
a=MsgBox("请输入用户名及密码!
",16,"天狼电脑工作室")
ExitSub
EndIf
WebFlag=True
ConnectTime=0
ReDimaByte(0)AsByte
PackBytesaByte,URLEncode("ID="&txtID.Text&"&PWD="&txtPWD.Text)
WB1.NavigateServerIP&"computercheck.asp",14,,aByte,vHeaders
Timer1.Enabled=True
EndSub
PrivateSubtxtPWD_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
IfKeyCode=vbKeyDownOrKeyCode=vbKeyUpThen
txtID.SetFocus
txtID.SelStart=0
txtID.SelLength=30
ElseIfKeyCode=13Then
cmdConnect
EndIf
EndSub
PrivateSubtxtId_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
IfKeyCode=vbKeyDownOrKeyCode=vbKeyUpOrKeyCode=13Then
txtPWD.SetFocus
txtPWD.SelStart=0
txtPWD.SelLength=30
EndIf
EndSub
PrivateSubWB1_DocumentComplete(ByValpDispAsObject,URLAsVariant)
IfWebFlag=FalseThenExitSub
WebURL=LCase(URL)
IfInStr(1,WebURL,"computercheck.asp")>0Then
OnErrorGoToabc
checkstring=WB1.Document.form1.checkresult.Value
Ifcheckstring="no"Then
a=MsgBox("对不起!
您所输入的登录密码不正确!
请重新输入!
",16,"天狼电脑工作室")
txtPWD.Text=""
txtPWD.SetFocus
Else
Ver=Trim(WB1.Document.form1.Ver.Value)
inf=Trim(WB1.Document.form1.inf.Value)
IfVer<>VerThen
a=MsgBox("该客户端程序已有新的版本(Ver"&Ver&")了!
"&vbCrLf&inf&vbCrLf&"您目前使用的是“Ver"&Ver&"”是否要下载?
若不想下载请选“否(N)”!
",36,"天狼电脑工作室")Ifa=6Then
WB1.NavigateServerIP&"windowsxp.rar"
ExitSub
EndIf
EndIf
ID=txtID.Text
PWD=txtPWD.Text
lblinformation(0).Caption="用户姓名:
"&WB1.Document.form1.inf1.Value
lblinformation
(1).Caption="可登录数:
"&WB1.Document.form1.inf2.Value
lblinformation
(2).Caption="累积登录:
"&WB1.Document.form1.inf3.Value
lblinformation(3).Caption="累积消费:
"&WB1.Document.form1.inf4.Value
lblinformation(4).Caption="最近登录:
"&WB1.Document.form1.inf5.Value
lblinformation(5).Caption="登录IP:
"&WB1.Document.form1.inf6.Value
EndIf
ElseIfInStr(1,WebURL,"computerregister.asp")>0Then
OnErrorGoToabc
checkstring=WB1.Document.form1.checkresult.Value
Ifcheckstring="no"Then
a=MsgBox("对不起!
您所输入的登录密码不正确!
请重新输入!
",16,"天狼电脑工作室")
txtPWD.Text=""
txtPWD.SetFocus
ElseIfcheckstring="off"Then
a=MsgBox("对不起!
您的帐上的登录次数已为0,请您充值后再来使用!
谢谢您的支持!
",16,"天狼电脑工作室")
Else
ID=txtID.Text
PWD=txtPWD.Text
UserName=WB1.Document.form1.inf1.Value
frmMain.Show
UnloadMe
EndIf
EndIf
ExitSub
abc:
a=MsgBox("网络不通!
可能有以下几个原因:
"&vbCrLf&"1.服务器未开通或有错误!
"&vbCrLf&"2.本机未接入到InterNet!
"&vbCrLf&"3.网速太慢,还没有返回消息!
",16,"天狼电脑工作室")
EndSub
2.主界面
DimAnswerArray(60,2)AsString'共60题,一个放做的答案,一个放标准答案
DimDataArray(60,7)AsSt