欢迎来到天天文库
浏览记录
ID:35626065
大小:97.00 KB
页数:12页
时间:2019-04-03
《VB课程设计报告--密码登录》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、南京工程学院课程设计说明书(论文)题目密码登录课程名称VB课程设计报告院(系、部、中心)能源与动力工程专业建筑环境与设备工程班级暖通091学生姓名刘江淮学号207090822设计地点图书馆指导教师于雷1设计起止时间:2010年6月28日至2010年7月312一、设计任务补全代码,并按要求完成课程设计报告二、系统总体设计方案密码登录是每一个数据库应用程序所必备的一个功能模块,觅得是为了保证系统及数据的安全。在用户进入某个系统时会弹出如同的对话框。。。。。。。确认用户输入的权限师傅正确,级点击“确认”的按钮。当用户输入的密码不正确时,系统将给出提示,如下图所示。。。。。。。12该模块的实现比
2、较通用,在类似数据库应用中都需要用到。有的系统还根据用户的需要提供了密码更改的功能。当你需要更改密码的时候会出现如下的对话框。首先输入原始密码,在输入新密码,确认新密码,然后点击“确认”键即可。三、程序总体框架图输入密码判断正误密码正确密码错误修改密码重新输入密码输入原密码新密码确认新密码登录密码正确登录12四、系统的调试源代码写完后,对系统进行调试运行,要求变量声明,对可能出现的几种错误,如:编辑时错误、编译时错误、运行时错误、逻辑错误,进行修改,调试,运行,直至系统能正常运行。五、收获体会Visualbasic语言是以结构化basic语言为基础,以事件驱动为运行机制。他的诞生标志着元
3、件设计和开发的新时代的开始。VB具有面向对象可视化设计工具,是事件驱动的编程机制,同时也提供了易学易用的应用程序集成开发环境。从Basic语言、Visualbasic语言的学习开始接触到编程,以前有过一段Basic语言的学习,觉得比较简单。当时很想自己能够熟练的进行程序编辑,工程上的软件编辑。随着大一的Visualbasic语言的学习才逐渐发现这理想想要实现的难度。对我而言学习编程,不仅能够帮自己解决在生活中可能遇到的一些问题;自己设计一些小游戏还可以给自己带来一些乐趣。同时也为自己在寻找理想工作添加重要的砝码。所以,我觉得在学习VB是我们要明确学习的目的。另外我觉得个人的数学基础,思维
4、逻辑能力对VB的学习有着至关重要的影响。而在学习的过程中最重要的就是理解,正如老师在课上经常对我们所讲的,不要始终照搬书上已有的代码,要学会理解、掌握编程的思想与方法,这样才能融会贯通,只有在理解方法的基础上学习才是最有效的学习。Visualbasic语言的学习要多实践,多交流。掌握编程方法必须在编程实际工作中去实践和体会。在学习初期要经常自己动手设计程序,集团设计师不要拘泥于固定的思维方式,遇到问题要多想几种解决方案。而这也要求与同学多多的交流,毕竟每个人的思维方法不同,角度各异。通过交流可以不断的吸收他人的长处,丰富编程实践,从而提高自己的水平。亲自动手实践试创造性思维应用的体现,也
5、是培养逻辑思维的好方法。六、源代码代码1OptionExplicitPublicPasswordAsString'密码12PublicFilePasswordAsString'保存在文件中的密码(经过加密处理)'将你输入的每个字符转换成密码数字PublicFunctionFun_NumericPassword(ByValPasswordAsString)AsLongDimnValueAsLongDimchAsLongDimShift1AsLongDimShift2AsLongDimiAsIntegerDimStr_LenAsInteger'得到字符串内字符的数目Str_Len=Len(P
6、assword)'将每个字符转换成数字Fori=1ToStr_Lench=Asc(Mid$(Password,i,1))'返回各字符的ASCII码nValue=nValueXor(ch*2^Shift1)nValue=nValueXor(ch*2^Shift2)Shift1=(Shift1+7)Mod19Shift2=(Shift2+13)Mod22NextiFun_NumericPassword=nValueEndFunction'加密子程序PublicSubMod_Cipher(ByValPasswordAsString,ByValFrom_TextAsString,To_TextA
7、sString)ConstMIN_ASC=32'Space.12ConstMAX_ASC=126'~.ConstNUM_ASC=MAX_ASC-MIN_ASC+1DimoffsetAsLongDimStr_LenAsIntegerDimiAsIntegerDimchAsIntegerTo_Text=""'得到了加密的数字offset=Fun_NumericPassword(Password)Rnd-1'对随机数生成器做初始化的动作R
此文档下载收益归作者所有