《VB数据库项目设计模块化教程 教学课件 ppt 作者 刘玉山 刘宝山 第3章 登录对话框模块设计》由会员分享，可在线阅读，更多相关《VB数据库项目设计模块化教程 教学课件 ppt 作者 刘玉山 刘宝山 第3章 登录对话框模块设计（28页珍藏版）》请在金锄头文库上搜索。
1、VB数据库项目设计模块化教程,主编 刘玉山,第3章 登录对话框模块设计,登陆对话框模块主要实现： (1)用户角色的选择。 (2)用户登录。 (1)数据库连接。 (2)动态数据集。 (3)查询。 (1)文本框、命令按钮、组合框控件的应用。 (2)弹出对话框、切换窗体技术。 3.1 项目需求分析 3.2 项目设计 3.3 技术要点小结,3.1 项目需求分析,3.1.1 项目需求分析的理解 3.1.2 项目需求分析 3.1.3 项目数据字典,3.1.1 项目需求分析的理解,图3-1 登陆对话框,3.1.1 项目需求分析的理解,图3-2 管理员界面,图3-1 登陆对话框 图3-2 管理员界面,图3-3
2、 弹出对话框,3.1.2 项目需求分析,1.项目功能需求 2.项目数据需求 3.项目性能需求,1.项目功能需求,（1）角色选择 根据用户扮演的不同的角色，可以分为：管理员、教师和学生。 （2）登录验证 根据系统分配的不同角色，进行用户角色的选择。同时通过用户输入的用户名和密码，系统进行验证。系统根据不同的角色，进入不同的系统管理界面。,2.项目数据需求,（1）数据输入次数的约束 对于每一个登录的用户，输入的次数应该不超过3次。如果超过3次，则不再允许输入。 （2）数据输入项的选择 对于每一个登录的用户，必须输入用户名和密码。否则不进行数据后台验证。,3.项目性能需求,（1）项目的易用性和易维护
3、性 对于这样一个项目，面对的用户，一般来说，可能大多数人员为非计算机人员。这就要求人机界面接口易于交互。同时要对其提供简单的帮助提示。 （2）项目的开放性和系统的可扩充性 对于该项目，由于当前系统采用的是C/S结构，为了以后便于升级为B/S结构。要求用户登录验证模块从当前框架中独立出来。这样，便于以后的扩展，比如增添其他的用户登录的要求模块等。当然也可以C/S与B/S并存。 （3）项目的响应速度 对于该项目，登录的响应时间不能太久。响应的时间为秒级别。 每个模块的性能大体相同，除特殊情况外后面不再进行项目的性能需求分析。,3.1.3 项目数据字典,项目中所涉及的数据元素： 名字：Login 别
4、名：登录信息 描述：用户的登录信息，用于用户的登录。 定义：登录信息=用户名+密码+用户权限。,3.2 项目设计,3.2.1 设计思想 3.2.2 程序设计 3.2.3 数据库设计,3.2.1 设计思想,当装载窗体时，完成两方面的事情：一是通过组合框的AddItem方法，使组合框（cmbUserType）的下拉列表内容为“管理员、教师或学生”；二是完成数据库EMS连接和形成数据表login的动态记录集。 从数据库EMS的表login中读取用户名称、用户密码和用户权限字段下的记录值RS（“用户名称“）、RS（“用户密码“）和RS（“用户权限“），与输入值txtName.Text、txtPassw
5、ord.Text和CmbUserType.Text的“与”作比较，为“真”时进入目标界面；为“假”时弹出错误提示对话框。流程图如图3-4。,3.2.1 设计思想,图3-4 用户登录流程图,表3-1 frmlogin窗体对象属性,表3-1 frmlogin窗体对象属性,3.2.3 数据库设计,图3-5 login数据表,图3-5 login数据表,图3-6 login表结构,图3-5 login数据表,图3-7 login记录,3.3 技术要点小结,3.3.1 ADO基本概念 3.3.2 ADO的引用 3.3.3 代码设计的要点,3.3.1 ADO基本概念,(1)Connection对象又称连接
6、对象，用于建立数据源的连接。在使用任何数据库之前，首先应创建程序与数据库的连接，然后才能对数据库做进一步的操作。 (2)Command对象又称命令对象，负责对数据库提供请求，也就是传递指定的SQL命令。在建立Connection后，通过Command命令(如：SQL命令)对数据源的数据进行操作(查询、添加、删除、修改等)。 (3)Recordset对象又称动态记录集对象，代表数据库中表的记录集或Command的操作结果。Recordset对象是最主要的对象，当用Command对象或Connection对象执行查询命令后，就会得到一个Recordset对象，该对象包含满足条件的所有记录。 (1)
7、连接数据源。 (2)打开动态记录集对象。 (3)使用记录集。 (4)断开连接。,3.3.1 ADO基本概念,图3-8 ADO对象模型,3.3.2 ADO的引用,Private DB As ADODB.Connection Private RS As ADODB.Recordset Set DB = New ADODB.Connection Set RS = New ADODB.Recordset DBConnection =“Provider = microsoft.jet.oledb.3.51;data source=“ PWD=密码“ DB.Open DBConnection RS.Ope
8、n “login”,DB, adOpenKeyset, adLockOptimistic Recordset.Open “数据表”，数据库对象变量,指针类型，锁定方式,3.3.3 代码设计的要点,1.数据记录的遍历 2.打开和关闭窗体 3.消息框MsgBox 4.组合框(ComboBox)控件,1.数据记录的遍历,在查询中需要将数据库中的数据记录进行遍历，一一比较，直到查询出所需结果，编程的基本格式为： For i = 1 To RS.RecordCount 从第一条记录直到最后一条记录 RS.AbsolutePosition = i 定位到第i条记录 比较第i条记录的语句 Exit For
9、结束查询 Next,2.打开和关闭窗体,应用程序中经常需要打开和关闭窗体，打开一个新的窗体的语句为：窗体名称.Show，关闭窗体的语句为：Unload窗体名称或窗体名称.Hide。注意Unload为卸载窗体，重新打开时需要再次装载，Hide为隐藏，没有卸载。,3.消息框MsgBox,执行VB提供的MsgBox函数，可以在屏幕上出现一个消息框，消息框通知用户消息并等待用户来选择消息框中的按钮，MsgBox函数返回一个与用户所选按钮相对应的整数。 语法：MsgBox（提示,标志和按钮,标题） 提示：必选项，一个字符表达式，用于提示用户输入的信息内容，可显示单行文字也可显示多行文字，但必须在行文字的
10、末尾加回车符Chr（13）和换行符Chr（10）。 标题：可选项，一个字符表达式，用于设置输入对话框标题栏中的标题。省略时使用工程名的标题。 标志和按钮：指定按钮的数目及类型，使用的图标样式及缺省按钮等，是按钮数目、使用的图标样式以及缺省按钮三项所对应的数据之和。“标志和按钮”的缺省值是0。本模块设计采用缺省值，更多关于“标志和按钮”的常量及数值在相关章节介绍，也可以参阅VB帮助的“MsgBox函数”主题。,4.组合框(ComboBox)控件,常用属性、方法和事件： （1）List属性 List是一个字符型数组，用于存放组合框的表项，数组的下标从0开始。 例如，欲将组合框List1中的第四项的
11、内容设置为字符串“计算机世界”，程序代码为： List1.List（3）= “计算机世界“ （2）ListIndex属性 返回已选定的项目的顺序号（索引），若未选定任何项，则ListIndex的值为-1，ListIndex属性只能在程序中设置和引用。 （3）ListCount属性 返回组合框中项目的总数，项目下标为0ListCount-1，ListCount属性只能在程序中设置和引用。 （4）Text属性 返回被选定项目的文本内容。Text属性只能在程序中设置和引用。,（5）AddItem方法 把一个项目加入组合框。格式为： 对象名.AddItem item , index 其中： item，
12、为字符串表达式，表示要加入的项目； Index，决定新增项目的位置，如果缺省，则添加在组合框的末尾。 例如，在Combo1的末尾插入一项“VB程序设计”，程序代码为： Combo1.AddItem“VB程序设计” （6）RemoveItem方法 删除组合框中指定项目，该方法每次只能删除一个项目。格式为： 对象名. RemoveItem index 其中，Index决定要删除的项目的索引，是必选项。 例如，删除组合框中第三项，程序代码为： List1.RemoveItem 2 例如，删除组合框中当前所选的项目，程序代码为： List1.RemoveItem list1.listindex （7）Clear方法 清除组合框中所有项目。 （8）Click事件 单击鼠标时触发。 （9）Change事件 组合框内容发生变化时触发，例如在组合框输入时触发。,
