VB课程设计报告。.docVIP

  1. 1、本文档共12页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
南京工程学院 课程设计说明书(论文) 题 目 密码登录 课 程 名 称 VB课程设计报告 院(系、部、中心) 能源与动力工程 专 业 建筑环境与设备工程 班 级 暖通091 学 生 姓 名 刘江淮 学 号 207090822 设 计 地 点 图书馆 指 导 教 师 于雷 1 设计起止时间:2010 年6 月28 日至 2010 年7 月 3 一、设计任务 补全代码,并按要求完成课程设计报告 二、系统总体设计方案 密码登录是每一个数据库应用程序所必备的一个功能模块,觅得是为了保证系统及数据的安全。在用户进入某个系统时会弹出如同的对话框。。。。。。。 确认用户输入的权限师傅正确,级点击“确认”的按钮。当用户输入的密码不正确时,系统将给出提示,如下图所示。。。。。。。 该模块的实现比较通用,在类似数据库应用中都需要用到。有的系统还根据用户的需要提供了密码更改的功能。当你需要更改密码的时候会出现如下的对话框。首先输入原始密码,在输入新密码,确认新密码,然后点击“确认”键即可。 三、程序总体框架图 四、系统的调试 源代码写完后,对系统进行调试运行,要求变量声明,对可能出现的几种错误,如:编辑时错误、编译时错误、运行时错误、逻辑错误,进行修改,调试,运行,直至系统能正常运行。 五、收获体会 Visual basic 语言是以结构化basic语言为基础,以事件驱动为运行机制。他的诞生标志着元件设计和开发的新时代的开始。VB具有面向对象可视化设计工具,是事件驱动的编程机制,同时也提供了易学易用的应用程序集成开发环境。 从Basic 语言、Visual basic 语言的学习开始接触到编程,以前有过一段Basic 语言的学习,觉得比较简单。当时很想自己能够熟练的进行程序编辑,工程上的软件编辑。随着大一的Visual basic 语言的学习才逐渐发现这理想想要实现的难度。对我而言学习编程,不仅能够帮自己解决在生活中可能遇到的一些问题;自己设计一些小游戏还可以给自己带来一些乐趣。同时也为自己在寻找理想工作添加重要的砝码。所以,我觉得在学习VB是我们要明确学习的目的。另外我觉得个人的数学基础,思维逻辑能力对VB的学习有着至关重要的影响。而在学习的过程中最重要的就是理解,正如老师在课上经常对我们所讲的,不要始终照搬书上已有的代码,要学会理解、掌握编程的思想与方法,这样才能融会贯通,只有在理解方法的基础上学习才是最有效的学习。Visual basic 语言的学习要多实践,多交流。掌握编程方法必须在编程实际工作中去实践和体会。在学习初期要经常自己动手设计程序,集团设计师不要拘泥于固定的思维方式,遇到问题要多想几种解决方案。而这也要求与同学多多的交流,毕竟每个人的思维方法不同,角度各异。通过交流可以不断的吸收他人的长处,丰富编程实践,从而提高自己的水平。亲自动手实践试创造性思维应用的体现,也是培养逻辑思维的好方法。 六、源代码 代码1 Option Explicit Public Password As String 密码 Public FilePassword As String 保存在文件中的密码(经过加密处理) 将你输入的每个字符转换成密码数字 Public Function Fun_NumericPassword(ByVal Password As String) As Long Dim nValue As Long Dim ch As Long Dim Shift1 As Long Dim Shift2 As Long Dim i As Integer Dim Str_Len As Integer 得到字符串内字符的数目 Str_Len = Len(Password) 将每个字符转换成数字 For i = 1 To Str_Len ch = Asc(Mid$(Password, i, 1)) 返回各字符的ASCII码 nVa

文档评论(0)

精华文档888 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档