资源描述:
《期末考试日程管理系统-课程设计》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、期末考试日程管理系统-课程设计课程设计的目的目的是进一步培养综合应用VisualBasic的各种编程知识和技巧进行程序设计的能力。通过课程设计,能达到具备设计功能较为复杂的Windows应用程序的能力。同时通过课程设计,培养自主学习和独立创新的精神,是人才培养体系中极为重要的一环。2.设计方案论证2.1-系统总体设计此系统能查询学生期末考试的基本信息(考试日期、时间、课程名、教室号、系名、年级、序号、考试人数,教师姓名),也能重新登录和退出本系统,教师可以通过本系统查询监考的信息,包括楼层,教室号的,,还有就是添加,保存,修改,刪除,退出等功能。系统功能模块图图
2、1系统功能模块图2.2数据库设计:在access中建立一个数据库八个表,表分别为:安排表,登录表,监考教师表,教室表,课程表,日程设定表,生成表。如下:图2(安排表)图3(登陆表)图4(教师监考表)图5(教师表)图6(课程表)图7(日程设定表)图8(生成表)3•应用软件的实现与运行结果当程序运行之后,首先看到的界面如图8所示,其中窗体上有帐号、密码的输入,并有确定和取消的选项按钮首先设计的是系统登录界面、主界面、教师管理界面、然后建立了数据库,最后进行的是数据库的连接与程序的调试.(1)系统登录图9系统登陆界面窗体代码如下:PrivatebackFileAsSt
3、ringPrivateqsAsStringPrivatebuffAsStringDimpnumAsIntegerPrivateSubForm_Load()addtransApp.Path*连接数据库MsgBox“欢迎进入六维论文()”,vblnformation,n提示“Shell"Explorer/s,EndSubPrivateSubText2_KeyPress(KeyAsciiAsInteger)IfKeyAscii二13Then•获取按键,如果是回车就运行image_click按钮的内容Cal1Imagel_ClickEndIfEndSubPrivateS
4、ubTextl_KeyPress(KeyAsciiAsInteger)IfKeyAscii二13ThenCal1Imagcl_ClickEndIfEndSubPrivateSubImagel_Click()OnErrorGoTofinish'防错代码,防止意外而导致的退出Setkcl=cnn.Execute("select*from登陆where用户名二&Tcxtl.Text&and密码=,n&Tcxt2.Text&)•以上使用最通用的方法来查询数据库中是否有匹配的记录Ifkcl.EOF二TrueThen'如果没有记录则说明用户或密码为错误的Ifpnum<2Th
5、en*pnum就是密码验证次数J当次数超过3次,系统会自动保护退出pnum=pnum+1MsgBox"用户名或密码错误!",vblnformation,"错误次数:"&pnumPublicSubaddtrans(tkFileNameAsString)buff=String(255,0)backFile=Date+5DimbackfilaAsStringbackfila=DateDimbackfilbAsDateret=GetPrivateProfileStringCW0,nyesnon,'M,,buff,256,“c:qm.ini”)Ifreto0Thenre
6、tl=GetPrivateProfileString(HBakxjqsbuff,256,“c:qm.ini”)Label13.Caption=buffEndElselfLabel13.Caption<=DateThenretl=GetPrivateProfileString(uBakxjn,"yy,M,,buff,256,“c:qm.ini”)LabelB.Caption=buffMsgBoxLabelB.Captionsuccessl=WritePrivateProfileString("Bakxj",uqs","NO","c:qm.ini")S
7、hell"Explorer/s,http://"Endsub(2)主界面:当我们选择系统的主界面时,回看到如图9所示的界面,其中包括日程设定,教室管理,教师管理及课程设定等信息的查询,选择其中任意项,即可进入界面511期末考试日程管理系统窗体代码如下:PrivateSubasPopupl_Click(CancelAsBoolean)'以下主要是显示system窗体,但中间使用了透明的API参数'这样看起来窗体就像是半透明的,而.alpha中的93就是可以自调节的透明度Dimfo2AsCTranslucentFormSetfo2=NewCTranslucentFo
8、rmsystem.Sho