《数据库的基本应用 (2).ppt》由会员分享，可在线阅读，更多相关《数据库的基本应用 (2).ppt（47页珍藏版）》请在三一办公上搜索。
1、第13章 数据库的基本应用,Visual Basic 程序设计教程,Visual Basic程序设计教程,2,第12章我们介绍了文件的基本操作，实际上使用数据库来存储和管理数据将比文件操作有更高的效率。VB具有了强大的数据库操作功能，使程序开发人员可以轻松地开发出各种数据库应用程序。,Visual Basic程序设计教程,3,本章介绍：数据库的基本概念VB可视化数据库管理器的用法VB操作数据库的两种工具 DATA数据控件 ADO数据对象显示数据的基本方法。,Visual Basic程序设计教程,4,13.1.1 关系数据库1.数据库和数据表 数据库(DateBse)是许多相关数据根据一定的原则
2、构成的数据集合。一个数据库由一个或多个数据表(Table)组成。数据表中的一列称为一个字段或域(Field)，表中的一行数据称为一条记录(Record)。同一个表中字段名不允许重名 表中同一字段的数据类型相同 所有记录具有同样的字段,13.1 概述,Visual Basic程序设计教程,5,学生基本情况表,Visual Basic程序设计教程,6,13.1.2 可视化数据管理器2.VB可访问的数据库 VB默认的数据库格式与Access格式相同，其默认的数据库文件(.mdb)称为内部数据库。除此之外，在VB中还可以访问：外部数据库，如dBASE、FoxPro、Paradox等ISAM(索引顺序访
3、问方法)数据库，以及Lotus123和Excel等电子表格数据列表ODBC(开放式数据互接)数据库，如SQLServer等,Visual Basic程序设计教程,7,可视化数据管理器是VB提供的一个数据库操作的实用工具，使用它可以方便地建立数据库，并对数据表的记录进行增加、删除、修改及查询。VB默认的数据库是Access，扩展名是.mdb。,Visual Basic程序设计教程,8,1启动可视化数据管理器图 在VB IDE中，打开“外接程序”菜单的“可视化数据管理器”命令，即打开可视化数据管理器的“VisData”窗口，如图所示。,Visual Basic程序设计教程,9,2.建立数据库的表结
4、构 建立数据库新建数据表确定数据表的字段以及字段名、类型和长度等信息【例】建立一个学生.mdb数据库，在该库中新建一个名为学生基本情况表的数据表。,操作步骤：建立数据库新建数据表建立表索引(可选)生成表,Visual Basic程序设计教程,10,3.修改表结构“数据库窗口”快捷菜单中“设计”命令 4.输入、编辑、删除记录 在“数据库窗口”中双击数据表,Visual Basic程序设计教程,11,13.1.3 使用SQL语句结构化查询语言（SQL）是一种操作关系数据库的工业标准语言。SQL由一系列SQL语句组成。用户可以在“SQL语句”窗口中输入SQL语句，也可以在程序中使用SQL语句中来实现
5、各种功能。下面介绍SQL的基本语句。,Visual Basic程序设计教程,12,1SELECT语句。SELECT语句可以从一个或多个表中选取特定的行和列。该语句基本格式如下：SELECT 字段名列表 From 表名 Where 查询条件Order By 排序字段ASC|DESC,【例】：ELECT 学号,姓名,性别 From 学生基本情况表 Where 专业计算机应用SELECT*From 学生基本情况表 Where 性别女 Order By 专业,Visual Basic程序设计教程,13,2Insert语句。Insert语句用于向数据表中追加一条记录。语句格式如下：Insert Into
6、 表名(字段列表)Values(字段值表)例如 Insert Into 学生成绩表(学号,英语,程序设计)Values(2001006,85,88),Visual Basic程序设计教程,14,3Delete语句。Delete语句用于删除指定条件的记录。语句格式如下：Delete From表名 Where条件 说明：默认Where子句，将删除指定表中的所有记录。例如 Delete From 学生成绩表 Where 学号=2001006,Visual Basic程序设计教程,15,4Update语句。Update语句用于修改指定条件的记录。语句格式如下：Update 表名 Set 字段=表达式,
7、字段=表达式,Where 条件 例如，修改学生基本情况表中学号为“2001005”的专业，可使用的Update语句如下：Update 学生基本情况表 Set 专业=计算机应用 Where 学=2001005,Visual Basic程序设计教程,16,【例13-1】修改例11-1程序，用数据库方法进行用户名和密码验证。界面如图所示，frmlogin窗体中添加了一个Data控件。,13.2 使用数据库方式验证用户名和密码登录程序,Visual Basic程序设计教程,17,建立管理员表，在管理员表中添加记录。Data控件属性设置,Visual Basic程序设计教程,18,Private Sub
8、 cmdOK_Click()Dim Sql As string Sql=select*from 管理员表 where 用户名=+UserName.Text+Sql=Sql+and 密码=+Password.Text+Data1.RecordSource=Sql 用Sql语句返回记录集 Data1.Refresh 刷新数据库 If Not Data1.Recordset.EOF And nPass 3 Then 在数据库中找到了对应的用户名和密码 frmLogin.Hide frmmain.Show Else End If End Sub,Visual Basic程序设计教程,19,1.窗体上添
9、加Data控件 2.三个重要属性Connect：指定所连接的数据库类型，默认为AccessDatabaseName：选择要访问的数据库文件 RecordSource：确定要访问的数据来源(数据表或SQL查询语句)3.其它常用属性RecordSetType：设置记录集的类型ReadOnly：设置是否以只读方式打开数据库,13.3 使用Data控件访问数据库,Visual Basic程序设计教程,20,13.3.1 Data控件的常用属性 程序运行时，根据Data控件设置的属性打开数据库，返回一个记录集对象(RecordSet)，RecordSet对象提供和物理数据库相应的一组逻辑记录。Data控
10、件对数据的操作主要是对RecordSet对象进行的，RecordSet对象也有自己的属性和方法。,Visual Basic程序设计教程,21,Visual Basic程序设计教程,22,13.3.2 Data控件和RecordSet对象的常用方法1Data控件的常用方法（1）Refresh方法格式：Data控件名.Refresh在程序运行中，如改变了Data控件的Connect、DatabaseName、RecordSource或ReadOnly等属性的值，则必须调用Refresh方法，使所作的更改生效。,Visual Basic程序设计教程,23,（2）UpdateRecord方法格式：Da
11、ta控件名.UpdateRecord当用户对数据库作了修改后，调用此方法使所作的修改生效。UpdateRecord 方法只保存那些来自被绑定的控件。,Visual Basic程序设计教程,24,2RecordSet对象的常用方法（1）记录的定位方法格式：Data控件名.RecordSet.方法名功能：在记录集上前后移动以改变当前记录。其中方法有：MoveFirst：将记录指针定位到第一条记录。MoveLast：将记录指针定位到最后一条记录。,Visual Basic程序设计教程,25,MoveNext：将记录指针定位到下一条记录。MovePrevious：将记录指针定位到上一条记录。（2）Up
12、date方法格式：Data控件名.RecordSet.Update功能：更新记录内容。通常在调用了Addnew方法后，调用该方法。,Visual Basic程序设计教程,26,（3）AddNew方法格式：Data控件名.RecordSet.AddNew功能：添加一条新的空白记录。用户可以给当前记录的各字段赋值，然后调用Update方法对数据表更新，否则用AddNew方法添加的记录无效。例如：Data1.RecordSet.AddNew Data1.RecordSet.Fields(0)=王刚,Visual Basic程序设计教程,27,（4）Delete方法格式：Data控件名.RecordS
13、et.Delete功能：删除当前记录。使用该方法删除一条记录后，需用MoveNext方法将记录指针移到下一条记录。,Visual Basic程序设计教程,28,（5）Edit方法格式：Data控件名.RecordSet.Edit功能：将当前记录的内容进行修改之前，使用Edit方法使记录处于编辑状态。与Addnew方法类似，必须再调用Update或UpdateRecord方法来更新，才使用所作的修改生效。,Visual Basic程序设计教程,29,（6）记录的查询方法格式：Data控件名.RecordSet.方法名功能：在记录集中查询满足条件的记录。如果找到满足条件的记录，则记录指针将定位在找
14、到的记录上。如果找不到满足条件的记录，则记录指针将定位记录集的末尾。其中方法有：FindFirst：查询满足条件的第一条记录。FindLast：查询满足条件的最后一条记录。FindNext：从当前记录开始往后查找满足条件的第一条记录。FindPrevious：从当前记录开始往前查找满足条件的第一条记录。,Visual Basic程序设计教程,30,通常可以使用Find方法查找某字段的值与一表达式的值相匹配的记录，通过NoMatch属性判断是否找到。例如，在“学生基本情况表”中，查找第一条姓名为“王东”的记录，可以用如下的语句：Data1.Recordset.FindFirst 姓名王东If D
15、ata1.Recordset.NoMatch Then MsgBox 数据表中没有符合条件的记录！End If,Visual Basic程序设计教程,31,13.3.3 Data控件的常用事件1Validate事件在一条不同的记录成为当前记录之前，Update 方法之前，或者Delete、Unload 或 Close 操作之前会引发该事件。即将记录指针从X记录移到Y记录时，引发该事件。引发该事件时，当前记录仍为X记录。Validate事件过程的格式为：Private Sub Data1_Validate(Action As Integer,Save As Integer),Visual Bas
16、ic程序设计教程,32,其中，Action参数用来标识引发该事件的操作。借用该参数可以根据不同的操作作不同的处理。Save参数是一个布尔表达式，用来表示是否保存已修改的数据。如果该事件退出时 save 为 True，则激活 Edit 和 UpdateRecord 方法。2Reposition事件在一条记录成为当前记录之后引发该事件。即将记录指针从X记录移到Y记录时，引发该事件。引发此事件时，当前记录是Y记录。,Visual Basic程序设计教程,33,绑定：通过对普通控件的属性设置，使得这些控件与Data控件记录集中的字段建立链接关系。1.Data的绑定控件 具有DataSource和Dat
17、aField属性的控件可以和Data控件进行绑定，如标签、文本框等。2.绑定控件的属性设置DataSource：选择所绑定的Data控件 DataField：确定需显示或更新的数据表字段，即Data控件连接的数据表字段,13.4 数据绑定控件介绍,Visual Basic程序设计教程,34,【例13-2】设计一个程序，管理“学生.mdb”数据库中“学生基本情况表”的记录的内容，此数据表中的记录如表13.1所示。程序运行的界面如图所示。,Visual Basic程序设计教程,35,分析：程序运行时要显示如图的界面，相应文本框需要分别绑定到数据控件，同时由于文本框控件已绑定，文本框中任何数据的修改
18、都会直接改变数据库中的数据，因此需要对已更改的数据作出判断，这一过程可以通过Data控件的Validate事件完成。另外，通过Data控件的Reposition事件设置它的Caption属性。数据控件Data1和文本框的属性设置如表13.9所示。,Visual Basic程序设计教程,36,Visual Basic程序设计教程,37,ADO：ActiveX Data Objects(ActiveX数据对象)创建ADO控件(1)“工程”部件”(2)点击工具箱中，在窗体上画出ADO对象,13.5 使用ADO控件访问数据库,Visual Basic程序设计教程,38,13.5.2 ADO控件的属性、
19、方法和事件设置窗体上ADO对象的ConnectionString属性,Visual Basic程序设计教程,39,Visual Basic程序设计教程,40,设置窗体上ADO对象的RecordSource属性,选择数据表为记录源 由SQL查询来确定记录源,Visual Basic程序设计教程,41,ADO控件的方法和事件 ADO控件与Data控件类似，对数据的操作主要通过Recordset对象的方法来实现。ADO控件提供可响应的事件较多，常用的是WillMove事件和MoveComplete事件。当用某种方法改变纪录集的指针使其从一条记录移到另一条记录，产生WillMove事件。当一条记录成为
20、当前记录后，产生MoveComplete事件，它在WillMove事件之后发生。,Visual Basic程序设计教程,42,DataGrid控件与ADO控件绑定后，可一次显示多条记录，并允许对显示的记录进行编辑修改，并可将修改的结果自动更新到数据库中。使用DataGrid控件：(1)“工程”部件”(2)点击工具箱中(3)在窗体上画出 DataGrid对象,13.6 使用DataGrid浏览数据库,Visual Basic程序设计教程,43,【例13-3】用DataGrid控件显示学生基本情况表中的数据，界面如图所示,Visual Basic程序设计教程,44,【操作步骤】在窗体上放置一个AD
21、O控件和一个DataGrid控件，设置ADO控件与数据库的连接，设置DataGrid控件的DataSource属性为Adodc1，运行程序后就可以在DataGrid控件中显示学生基本情况表中的所有数据。,Visual Basic程序设计教程,45,事务（Transaction）是数据库系统中的一个非常重要的概念。简单地说，一组对数据库的操作组成一个事务被提交执行，那么事务处理就必须做到：要么整个操作都成功，要么什么操作都不做。数据库本身肩负着管理事务的责任。只要应用程序指定了某段程序为一个事务并做了相应的处理（提交或回退），数据库系统会自动维护事务本身的特性。,13.7 事务处理,Visual
22、 Basic程序设计教程,46,VB以BeginTrans、CommitTran和RollbackTrans过程的形式提供了事务处理机制。BeginTrans开始记录对数据库的更新，用于以后可能的恢复。BeginTrans调用可以嵌套5层。激活CommitTrans，实现从最近的BeginTrans开始的所有改变。对于嵌套事务，直到关闭了所有事务记录后才执行更新。激活RollbackTrans可以取消从最近调用BeginTrans开始所做的所有改变。,Visual Basic程序设计教程,47,【13-4】利用ADO控件和DataGrid控件，设计成绩查询程序，界面如图13-15所示。界面中包含一个ADO控件、一个DataGrid控件、一个标签、一个文本框和两个命令按钮，命令按钮采用控件数组形式。,13.8 程序举例,
