vb背单词系统课程设计教学文案.doc

《vb背单词系统课程设计教学文案.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB课程设计报告题目：背单词管理系统设计专业：信息工程（信息安全）班级：1132101学号：20113021037姓名：包正巍指导老师：魏树权时间：2013年1月6号目录摘要………………………………………………3一．实验要求……………………………………4二．设计方案……………………………………4三．截图分析……………………………………5总结………………………………………………17摘要：VisualBasis是美国Microsoft公司在1991年推出的Windows环境下开发的软件。Visual意为“可视化的”，指的是一种开发图形用户界面的方法。Basis是20世纪60年代初产生的一门

2、计算机程序设计语言，它以简单易学，使用方便的特点，得到了广泛的应用；同时VisualBasis6.0在前几个版本的基础上进一步发展。本设计主要应用VisualBasis6.0，并且VisualBasis6.0有在所有开发语言中最简单，最容易使用的语言，简单易学，功能强大等，优点。SQLServer是微软公司开发的数据库产品，SQLServer2000被广泛使用，很多电子商务网站、企业内部信息化平台等都是基于SQLServer产品上。今天的商业环境要求不同类型的数据库解决方案。性能、可伸缩性及可靠性是基本要求，而进入市场时间也非常关键。除这些核心企业品质外，SQLServer2000还为

3、您的数据管理与分析带来了灵活性，允许单位在为企业赢得核心竞争优势打开了胜利之门。同时SQLServer2000具有高性能设计，可充分利用WindowsNT的优势；系统管理先进，支持Windows图形化管理工具，支持本地和远程的系统管理和配置;强壮的事务处理功能，采用各种方法保证数据的完整性;支持对称多结构管理工具、存储过程、ODBC，并具有自主的SQL语言。SQLServer以其内置的数据复制功能、强大的、与Internet的紧密集成和开放的系统结构为广大的用户、开发人员和系统集成商提供了一个出众的数据库平台；同时实现与VisualBasis6.0的连接，以VisualBasis6.0

4、为界面对数据库进行访问。一．实验要求简易背单词系统（采用数据库方式实现）：1)词库维护：既增加新的单词。2)根据词库，自动弹出弹出中文题目，用户输入英文以后，系统判断是否正确，并给出正确答案。3)输入一个中文，可以得出相应的英文单词！二.设计方案显示中文输入单词输入中文输入英文单词测试输入中文显示英文新增单词单词查询系统主界面上图是整个背单词上图是整个背单词系统的逻辑结构，概要设计中各个功能模块的划分就是依据上图来实现的。1．单词查询：可以输入的中文查询，显示显示英文2．新增单词：可以输入英文和中文并且添加。3．单词测试：可以按显示中文，输入英文，如果不正确可以得到正确的答案，和分数。

5、三．截图分析：对数据库表的截图：四.VB系统设计：系统登陆界面设计程序代码：PrivateSubCommand1_Click()Form2.ShowEndSubPrivateSubForm_Load()EndSub程序代码：PrivateSubCommand1_Click()Form3.ShowEndSubPrivateSubCommand2_Click()Form4.ShowEndSubPrivateSubCommand3_Click()Form5.ShowEndSubPrivateSubForm_Load()EndSub单词查询：程序代码：PrivateSubCommand2_Cl

6、ick()rs.MoveNextEndSubPrivateSubCommand3_Click()IfNotrs.EOFThenrs.MoveNextIfNotrs.EOFThenText2=rs.Fields(0)EndIfEndIfEndSubPrivateSubCommand4_Click()UnloadMeEndSubPrivateSubForm_Load()EndSub新增单词：程序代码：DimsqlAsStringPrivateSubCommand1_Click()Adodc1.Recordset.AddNewAdodc1.RefreshEndSubPrivateSubCom

7、mand2_Click()Adodc1.Recordset.DeleteAdodc1.RefreshEndSubPrivateSubCommand3_Click()UnloadMeEndSubPrivateSubForm_Load()EndSub单词测试：程序代码：DimaAsSingleDimbAsSingleDimcAsStringDimdAsObjectDimrsAsNewADODB.RecordsetPrivateSubCommand1