《vb编程技术》数据库访问技术.ppt

第第1414章章 数据库访问技术数据库访问技术 第第14章章 数据库访问技术数据库访问技术 14.1 数据库的概念数据库的概念 14.2 Access数据库数据库 14.3 使用数据控件使用数据控件 14.4 使用使用ADO控件控件 习题十四习题十四 第第1414章章 数据库访问技术数据库访问技术 14.1 数据库的概念数据库的概念 14.1.1 数据库的概念 1.数据库 所谓数据库(Database)，是指一组排列成易于处理或读取的相关信息，它是由一个或多个表对象组成的集合。这有些类似于Excel的工作簿和工作表。第第1414章章 数据库访问技术数据库访问技术 2.数据库管理系统 数据库管理系统是指在操作系统支持下为数据库建立、使用和维护而配置的庞大软件，如Microsoft SQL Server和Microsoft Access等。3.数据库应用程序 数据库应用程序是指用VB、FoxPro等开发工具设计的、实现某种特定功能的应用程序。4.数据库系统 数据库系统是由计算机硬件、操作系统、数据库管理系统以及在其他对象支持下建立起来的数据库、数据库应用程序、用户和维护人员等组成的一个整体。第第1414章章 数据库访问技术数据库访问技术 14.1.2 关系型数据库 按数据组织形式可以将数据库分为层次型、网状型和关系型结构。其中最常用的是关系型数据库。关系型数据库由表、记录、字段组成。表的数据组织形式类似与一张二维关系表，每行称为一条记录，每列称为一个字段。一个数据库由若干张表来组成，表与表之间通过关系来连接。第第1414章章 数据库访问技术数据库访问技术 14.2 Access数据库数据库 14.2.1 创建Access数据库和表 1.创建Access数据库 创建Access数据库的步骤为 (1)执 行“开 始”菜 单“程 序”选 项 下 的“Microsoft Access”命令，启动Access 2000，打开如图14.1所示的对话框。第第1414章章 数据库访问技术数据库访问技术 (2)选中“空Access数据库”后，单击“确定”按钮。(3)在打开的“文件新建数据库”对话框中，输入数据库文件名(如stu)，并选择保存的位置后，单击“创建”按钮。第第1414章章 数据库访问技术数据库访问技术 图14.1 创建数据库 第第1414章章 数据库访问技术数据库访问技术 2.创建Access数据表 新建或打开数据库后，在图14.1所示的数据库对话框中，用户可以选择使用设计器、使用向导或通过输入数据的方法创建表。这里只介绍使用设计器创建表的方法。(1)双击“使用设计器创建表”选项打开图14.2所示的创建表结构对话框。(2)依次输入各字段的名称和数据类型，在“字段属性”栏中输入字段的大小、格式等属性值。第第1414章章 数据库访问技术数据库访问技术 图14.2 使用设计器创建表结构 第第1414章章 数据库访问技术数据库访问技术 (3)输入完毕后关闭设计表结构对话框，系统会提示为新建的表命名(本例命名为“基本情况”)。命名后，新建的表将出现在数据库窗口中。(4)如果需要修改表结构，可以在数据库窗口中选择了表名称后，单击工具栏中“设计”按钮，重新进入创建表结构窗口进行必要的修改。第第1414章章 数据库访问技术数据库访问技术 (5)双击表名称打开图14.3所示的表数据输入窗口，依次将各种数据输入到数据表中，需要注意的是，表中主键字段的值不允许空缺。(6)输入完毕后关闭输入窗口，将数据保存在数据库文件中。第第1414章章 数据库访问技术数据库访问技术 图14.3 输入表中各字段的数据 第第1414章章 数据库访问技术数据库访问技术 14.2.2 创建查询 如果在数据库中存在有多张数据表，并且各表中存在有相同的字段信息。此时为了避免数据冗余，通常利用数据表中的关系来减少表中的字段，如图14.4所示的“成绩”表中就省略了“姓名”、“性别”、“年龄”等字段。当需要使用综合信息时可以通过创建查询实现对多表的信息组合。第第1414章章 数据库访问技术数据库访问技术 图14.4 成绩表 第第1414章章 数据库访问技术数据库访问技术 创建查询的步骤如下：(1)单击数据库窗口中的“查询”按钮，双击“在设计视图中创建查询”选项，如图14.5所示，打开查询设计器。第第1414章章 数据库访问技术数据库访问技术 图14.5 查询设计器窗口 第第1414章章 数据库访问技术数据库访问技术 (2)在“显示表”对话框中，选择需要的表后，单击“添加”按钮将其添加到查询中(本例将“成绩表”和“基本情况”添加到查询中)。第第1414章章 数据库访问技术数据库访问技术 图14.6 创建查询字段第第1414章章 数据库访问技术数据库访问技术 如果需要向查询中添加一些计算字段，如总分、平均分等，可以使用字段生成器。方法为 (1)在需要的位置上(如本例的“高等数学”之后)，单击鼠标右键，在弹出的快捷菜单中执行“生成器”命令，打开图14.7所示的“表达式生成器”窗口。(2)输入表达式字段名后，用“：”分割后面的表达式内容。第第1414章章 数据库访问技术数据库访问技术 (3)输入完毕后，单击“确定”按钮。(4)如果希望在“平均分”字段中设置保留小数点的位数，可以在平均分字段中单击鼠标右键，在弹出的快捷菜单中执行“属性”命令，在格式栏中输入“0.0”表示保留一位小数，如图14.8所示。第第1414章章 数据库访问技术数据库访问技术 图14.7 表达式生成器窗口 第第1414章章 数据库访问技术数据库访问技术 图14.8 设置表达式的格式 第第1414章章 数据库访问技术数据库访问技术 (5)设计完成后关闭设计器窗口时，系统会提示输入新建查询的名称，并将其显示到数据库窗口中，双击查询名称可以看到查询中包含的数据，如图14.9所示。第第1414章章 数据库访问技术数据库访问技术 图14.9 新建查询的内容 第第1414章章 数据库访问技术数据库访问技术 14.3 使用数据控件使用数据控件 【例14-1】Data控件和数据绑定控件的使用方法示例。新建一个VB标准EXE工程，在窗体上添加两个文本框，两个标签和一个Data控件，如图14.10左所示。第第1414章章 数据库访问技术数据库访问技术 图14.10 Data控件和数据绑定控件的使用示例 第第1414章章 数据库访问技术数据库访问技术 14.3.1 数据控件的属性 数据控件是VB的标准控件之一，可以直接从工具箱中加入窗体。Data控件的属性中，3个基本属性(Connect、DatabaseName和RecordSource)决定了所要访问的数据资源。1.Connect(连接)属性 该属性用于定义所要连接的数据库类型，如“Access”表示连接Access 97格式的数据库。2.DatabaseName(数据库名)属性 该属性决定Data控件连接到哪个数据库上。第第1414章章 数据库访问技术数据库访问技术 3.RecordSource(记录源)属性 该属性主要用来设置Data控件打开的数据库表名或查询名。第第1414章章 数据库访问技术数据库访问技术 14.3.2 数据控件的事件 1.Error事件 该事件主要用来处理不能被任何应用程序捕获的错误。事件的语法格式为 Private Sub Data1_Error(DataErr As Integer,Response As Integer)(错误处理代码)End Sub第第1414章章 数据库访问技术数据库访问技术 2.Reposition事件 当用户单击Data控件上某个箭头按钮，或者在代码中使用了某个Move或Find方法使某条新记录成为当前记录时，将激发Reposition事件。第第1414章章 数据库访问技术数据库访问技术 3.Validate事件 在一条不同的记录成为当前记录之前，Update方法之前(用UpdateRecord方法保存数据时除外)及Delete、Unload或Close操作前，会发生该事件。其语法格式如下：Private Sub object_Validate(Action As Integer,Save As Integer)(事件处理代码)End Sub第第1414章章 数据库访问技术数据库访问技术 14.3.3 数据控件的方法 1.Refresh方法 该方法主要用来建立或重新显示与Data控件相连接的数据库记录集。2.UpdateRecord方法 通过该方法可以将数据绑定控件上的当前内容写入到数据库中，即可以在修改数据后调用该方法来确认修改。第第1414章章 数据库访问技术数据库访问技术 3.UpdateControls方法 通过该方法可以将数据从数据库中重新读入到数据绑定控件中，即可以使用该方法放弃对数据绑定控件中数据的修改。4.Close方法 该方法主要用于关闭数据库或记录集，并且将该对象设置为空。第第1414章章 数据库访问技术数据库访问技术 14.3.4 记录集对象(Recordset)VB的Jet数据库引擎提供了大量的记录集属性和方法。1.Recordset对象的属性 1)BOF和EOF属性 2)Absolute Position属性 3)Bookmark属性 4)RecordCount属性第第1414章章 数据库访问技术数据库访问技术 2.Recordset对象的方法1)AddNew和Edit方法AddNew方法为数据库表添加一条记录。2)Delete方法该方法删除记录集中的当前记录。第第1414章章 数据库访问技术数据库访问技术 3)Move方法 该方法用于记录指针的移动，常用于浏览数据库中的数据，包括以下4种方法：MoveFirst：使记录集中的第一条记录成为当前记录。MoveLast：使记录集中的最后一条记录成为当前记录。MoveNext：下移一条记录，使下一条记录成为当前记录。MovePrevious：上移一条记录，使上一条记录成为当前记录。第第1414章章 数据库访问技术数据库访问技术 4)Find方法 该方法用于在Dynaset和快照类型的记录集中，查找符合指定条件的记录。若找到符合条件的记录则将记录指针指向该记录，并将Recordset对象的Nomatch属性设为True。否则将指针指向记录集的末尾，并将Recordset对象的Nomatch属性设为False。包括以下4种方法：第第1414章章 数据库访问技术数据库访问技术 FindFirst：查找符合条件的第一条记录。FindLast：查找符合条件的最后一条记录。FindNext：查找符合条件的下一条记录。FindPrevious：查找符合条件的上一条记录。第第1414章章 数据库访问技术数据库访问技术 【例14-2】设计一个学生成绩管理程序，程序启动后显示数据库中记录总数、当前记录号及当前记录的各项数据，如图14.11所示。分析：我们让用户可以通过“学号”或“姓名”下拉列表选择或输入后按回车键的方法，查询指定学生的成绩，无此记录时显示提示信息，如图14.12所示。单击“添加”或“修改”按钮后，显示输入口令对话框，如图14.13所示。第第1414章章 数据库访问技术数据库访问技术 图14.11 程序主界面 第第1414章章 数据库访问技术数据库访问技术 图14.12 未找到匹配记录错误 第第1414章章 数据库访问技术数据库访问技术 图14.13 回答口令方可更改数据第第1414章章 数据库访问技术数据库访问技术 设计步骤如下：(1)创建数据库。通过Access建立一个名为“成绩管理.mdb”的数据库，保存在D盘根目录下，在库中建立一个名为“成绩”的表，并向其中添加一些数据记录，表结构如表14-1所示。第第1414章章 数据库访问技术数据库访问技术 表14-1 成绩表结构第第1414章章 数据库访问技术数据库访问技术 (2)设计程序界面。本程序分为3个窗体，如图14.14、图14.15和图14.16所示。启动窗体为“成绩管理”。在主窗体中添加5个按钮，其中“删除”和“更新”按钮启动时不可见，并且与“添加”、“修改”按钮重叠放置。其他控件的情况按这几个图设置，这里不再赘述。第第1414章章 数据库访问技术数据库访问技术 图14.14 设计主程序界面 第第1414章章 数据库访问技术数据库访问技术 图14.15 设计添加记录界面 第第1414章章 数据库访问技术数据库访问技术 图14.16 设计输入口令界面第第1414章章 数据库访问技术数据库访问技术 (3)设置对象属性。将“成绩管理”和“添加记录”窗体中的Data控件的DatabaseName属性设为数据库存放位置d:成绩管理.mdb，RecordSource属性设为“成绩”表。第第1414章章 数据库访问技术数据库访问技术 (4)编写程序代码。“成绩管理”窗体模块的代码为Public panduan As Integer Dim reccount As Integer 用来存放总记录条数“学号”组合框Combo1的Click事件代码为Private Sub Combo1_Click()Data1.Recordset.MoveFirst 将记录指针指向第一条记录第第1414章章 数据库访问技术数据库访问技术 Data1.Recordset.FindFirst 学号=&Combo1.Text&Combo2.Text=Data1.Recordset(姓名)Call xianshiEnd Sub在“学号”组合框中按回车键时执行的程序代码为Private Sub Combo1_KeyUp(KeyCode As Integer,Shift As Integer)If KeyCode=13 ThenData1.Recordset.MoveFirst第第1414章章 数据库访问技术数据库访问技术 Data1.Recordset.FindFirst 学号=&Combo1.Text&Combo2.Text=Data1.Recordset(姓名)If Data1.Recordset.NoMatch Then 未找到匹配的记录，则显示提示信息 MsgBox 查无此人！,48,注意Else Call xianshi 调用xianshi过程End If End IfEnd Sub第第1414章章 数据库访问技术数据库访问技术 “姓名”组合框Combo2的Click事件代码为Private Sub Combo2_Click()Data1.Recordset.MoveFirst Data1.Recordset.FindFirst 姓名=&Combo2.Text&Combo1.Text=Data1.Recordset(学号)Call xianshiEnd Sub在“姓名”组合框中按回车键时执行的代码为第第1414章章 数据库访问技术数据库访问技术 Private Sub Combo2_KeyUp(KeyCode As Integer,Shift As Integer)If KeyCode=13 ThenData1.Recordset.MoveFirstData1.Recordset.FindFirst 姓名=&Combo2.Text&Combo1.Text=Data1.Recordset(学号)If Data1.Recordset.NoMatch Then MsgBox 查无此人！,48,注意Else Call xianshi 调用xianshi过程End If第第1414章章 数据库访问技术数据库访问技术 End IfEnd Sub“添加”按钮Command1的Click事件代码为Private Sub Command1_Click()panduan=1 Form2.Show 1 显示输入口令对话框End Sub“修改”按钮Command2的Click事件代码为Private Sub Command2_Click()panduan=2 Form2.Show 1End Sub第第1414章章 数据库访问技术数据库访问技术 重新计算“总分”和“平均分”字段的值的自定义过程为Sub gengxin()Data1.Recordset.MoveFirst Do While Data1.Recordset.EOF=FalseData1.Recordset.Edit 进入编辑状态Data1.Recordset(总分)=Data1.Recordset(数学)+_ Data1.Recordset(英语)+Data1.Recordset(计算机)第第1414章章 数据库访问技术数据库访问技术 Data1.Recordset.Update 将缓冲区中的数据写入数据库Data1.Recordset.EditData1.Recordset(平均分)=Format(Data1.Recordset(总分)/3,0.0)Data1.Recordset.UpdateData1.Recordset.MoveNext LoopEnd Sub刷新文本框中显示信息的自定义过程为第第1414章章 数据库访问技术数据库访问技术 Sub xianshi()Text1=Data1.Recordset(数学)Text2=Data1.Recordset(英语)Text3=Data1.Recordset(计算机)Text4=Data1.Recordset(总分)Text5=Format(Data1.Recordset(平均分),0.0)保留1位小数点 Label8.Caption=记录号：&Data1.Recordset.AbsolutePosition+1&/&reccountEnd Sub第第1414章章 数据库访问技术数据库访问技术 “删除”按钮Command3的Click事件代码为Private Sub Command3_Click()a=MsgBox(当前记录将被删除，确定吗？,4+48,警告)If a=vbNo Then Exit Sub Data1.Recordset.Delete Data1.Refresh Combo1.Clear Combo2.Clear Call chushihuaEnd Sub第第1414章章 数据库访问技术数据库访问技术 “更新”按钮Command4的Click事件代码为Private Sub Command4_Click()a=MsgBox(当前记录将被修改，确定吗？,4+48,警告)If a=vbNo Then Exit Sub Data1.Recordset.Edit With Data1 .Recordset(学号)=Combo1.Text .Recordset(姓名)=Combo2.Text .Recordset(数学)=Text1第第1414章章 数据库访问技术数据库访问技术 .Recordset(英语)=Text2 .Recordset(计算机)=Text3 .Recordset(总分)=Val(Text1)+Val(Text2)+Val(Text3).Recordset(平均分)=Format(.Recordset(总分)/3,0.0)End With Combo1.Clear Combo2.Clear Data1.Refresh Call chushihua Call xianshiEnd Sub第第1414章章 数据库访问技术数据库访问技术 “退出”按钮Command5的Click事件代码为Private Sub Command5_Click()If Command1.Visible=False ThenCommand1.Visible=TrueCommand2.Visible=TrueCommand3.Visible=FalseCommand4.Visible=False ElseUnload Me End IfEnd Sub第第1414章章 数据库访问技术数据库访问技术 窗体初始化时执行的代码为Private Sub Form_Initialize()Data1.Refresh Call gengxin Call chushihuaEnd Sub数据初始化自定义过程为Sub chushihua()Data1.Recordset.MoveFirst Do While Data1.Recordset.EOF=False第第1414章章 数据库访问技术数据库访问技术 Combo1.AddItem Data1.Recordset(“学号”)将学号字段的内容添加至组合框列表Combo2.AddItem Data1.Recordset(“姓名”)将姓名字段的内容添加至组合框列表Data1.Recordset.MoveNext Loop reccount=Data1.Recordset.RecordCount Data1.Recordset.MoveFirst第第1414章章 数据库访问技术数据库访问技术 Combo1.Text=Data1.Recordset(学号)Combo2.Text=Data1.Recordset(姓名)Call xianshiEnd Sub“输入口令”窗体模块的代码为Dim cishu As Integer 用来存放输入口令的次数“确定”按钮Command1的Click事件代码为Private Sub Command1_Click()第第1414章章 数据库访问技术数据库访问技术 If Text1=Then 1 指定密码为一个空字符串Unload MeIf Form1.panduan=1 Then 单击主窗体上的“添加”按钮 Unload Form1 Form3.Show 1第第1414章章 数据库访问技术数据库访问技术 Else Form1.Text1.Locked=False Form1.Text2.Locked=False Form1.Text3.Locked=False Form1.Command1.Visible=False Form1.Command2.Visible=False Form1.Command3.Visible=True Form1.Command4.Visible=TrueEnd If Else第第1414章章 数据库访问技术数据库访问技术 If cishu 2 Then 三次密码输入错误退出本模块 MsgBox 无效口令，请重新输入！,48,错误 Text1=Text1.SetFocus cishu=cishu+1Else MsgBox 你无权使用本功能！,48,警告 Unload MeEnd If End If第第1414章章 数据库访问技术数据库访问技术 End Sub“取消”按钮Command2的Click事件代码为Private Sub Command2_Click()Unload MeEnd Sub“添加记录”窗体模块的代码：“更新”按钮Command1的Click事件代码为Private Sub Command1_Click()第第1414章章 数据库访问技术数据库访问技术 If Text1=Or Text2=Or Text3=Or Text4=Or Text5=ThenMsgBox“请输入完整的数据！”,48 若有空白项则显示提示信息，退出过程Text1.SetFocusExit Sub End If With Data1 .Recordset.AddNew第第1414章章 数据库访问技术数据库访问技术 .Recordset(学号)=Text1 .Recordset(姓名)=Text2 .Recordset(班级)=Text3 .Recordset(数学)=Text4 .Recordset(英语)=Text5 .Recordset(计算机)=Text6 .Recordset(总分)=Val(Text4)+Val(Text5)+Val(Text6).Recordset(平均分)=Format(.Recordset(总分)/3,0.0).Recordset.Update End With第第1414章章 数据库访问技术数据库访问技术 Text1=:Text2=:Text3=:Text4=Text5=:Text6=:Text1.SetFocusEnd Sub“取消”按钮Command2的Click事件代码为Private Sub Command2_Click()Unload Me Form1.Show Call Form1.chushihuaEnd Sub第第1414章章 数据库访问技术数据库访问技术 14.4 使用使用ADO控件控件 14.4.1 ADO数据控件的属性和方法 1.ADO数据控件与数据库相关的常用属性 1)ConnectionString属性 该属性是一个字符串，可以包含一个连接所需的所有设置值，在该字符串中所传递的参数是与驱动程序相关的。第第1414章章 数据库访问技术数据库访问技术 表14-2 ConnectionString属性的参数第第1414章章 数据库访问技术数据库访问技术 2)UserName 当数据库受密码保护时，需要指定该属性。3)Password 在访问一个受保护的数据库时Password是必需的。4)RecordSource 该属性通常包含一个数据库表名、一个查询或一个存储过程调用，用于决定从数据库中检索什么信息。第第1414章章 数据库访问技术数据库访问技术 5)CommandType 该属性用于指定RecordSource属性的取值类型是一个表的名称、一个查询、一个存储过程还是一个未知的类型，如表14-3所示。第第1414章章 数据库访问技术数据库访问技术 表14-3 CommandType属性的取值第第1414章章 数据库访问技术数据库访问技术 【例14-3】使用ADO控件设计一个简单的数据库浏览程序。程序启动后界面如图14.17所示，用户可以通过单击窗体下方ADO控件的移动箭头改变文本框中显示的记录信息。第第1414章章 数据库访问技术数据库访问技术 图14.17 程序启动后的界面第第1414章章 数据库访问技术数据库访问技术 (1)设计程序界面。在窗体中添加4个标签、4个文本框和一个ADO控件。(2)设计对象属性。第第1414章章 数据库访问技术数据库访问技术 图14.18 ADO“属性页”对话框 第第1414章章 数据库访问技术数据库访问技术 图14.19 数据链接属性的“所有”选项卡第第1414章章 数据库访问技术数据库访问技术 图14.20 “记录源”选项卡 第第1414章章 数据库访问技术数据库访问技术 图14.21 “身份验证”选项卡第第1414章章 数据库访问技术数据库访问技术 (3)编写程序代码如下：Private Sub Text1_Change()a=Adodc1.Recordset.AbsolutePosition 当前记录号 b=Adodc1.Recordset.RecordCount 数据源中记录的总数 Adodc1.Caption=当前记录号：&a&/&bEnd Sub第第1414章章 数据库访问技术数据库访问技术 2.ADO Recordset对象的方法 1)CancelUpdate方法 该方法取消添加、修改记录的操作，恢复到更改以前的状态。2)UpdateBatch方法 该方法保存添加的记录或修改以后的内容。第第1414章章 数据库访问技术数据库访问技术 14.4.2 使用数据窗体向导 VB提供的数据窗体向导可以帮助用户快速建立一般化的数据库应用程序，它可以根据用户的选择自动设置前面介绍过的ADO控件和数据绑定控件。第第1414章章 数据库访问技术数据库访问技术 使用数据窗体向导的步骤如下：(1)从“外接程序”菜单或“添加窗体”对话框中启动“数据窗体向导”，若以前使用过该向导，并保存了配置文件，则在图14.22所示的“数据窗体向导介绍”对话框中可以装载原来的设置，并单击“下一步”按钮。第第1414章章 数据库访问技术数据库访问技术 (2)在打开的“数据窗体向导数据库类型”对话框中，选择本地数据库Access或远程数据库Remote(ODBC)的数据库类型，选择完毕后单击“下一步”按钮。(3)根据上面用户的选择，将打开不同的对话框。图14.23所示为Access的“数据窗体向导数据库”对话框，图14.24所示为Remote(ODBC)的“数据窗体向导连接信息”对话框。本例选择了本地硬盘上的“成绩管理.mdb”Access数据库。单击“下一步”按钮。第第1414章章 数据库访问技术数据库访问技术 图14.22 数据窗体向导介绍 第第1414章章 数据库访问技术数据库访问技术 图14.23 数据窗体向导数据库第第1414章章 数据库访问技术数据库访问技术 (4)在“数据窗体向导From”中，用户可以指定窗体名称、窗体布局样式和绑定类型。在该对话框中VB为用户提供了5种窗体布局方式，当选择了某种样式后，在预览区可以看到大体的外观，如图14.25所示。本 例 选 择 了 单 个 记 录、ADO控 件，窗 体 名 为frmChengji(代码中用)，单击“下一步”。第第1414章章 数据库访问技术数据库访问技术 图14.24 数据窗体向导连接信息 第第1414章章 数据库访问技术数据库访问技术 图14.25 数据窗体向导设置窗体参数第第1414章章 数据库访问技术数据库访问技术 (5)在“数据窗体向导数据源”对话框中，指定某一表为数据源，并从可用字段中选择需要显示在窗体中的字段，调整显示字段的排列顺序，设置排序依据，设置完毕后单击“下一步”按钮。(6)在“数据窗体向导控件选择”对话框中，用户可以选择窗体中出现的可选按钮控件(删除、添加、刷新等)。完后单击“下一步”按钮。(7)在“数据窗体向导已完成”对话框中，用户可以将以上各项设置保存成配置文件以备今后继续使用。第第1414章章 数据库访问技术数据库访问技术 (8)单击“完成”按钮，VB将自动生成窗体及主要代码，如图14.26和图14.27所示。第第1414章章 数据库访问技术数据库访问技术 图14.26 自动生成的程序界面 第第1414章章 数据库访问技术数据库访问技术 图14.27 自动生成的程序代码第第1414章章 数据库访问技术数据库访问技术 习习 题题 十十 四四 14.1 简述数据库、数据库管理系统、数据库应用程序和数据库系统的概念。14.2 关系型数据库有哪些特点？14.3 记录、字段、表与数据库之间的关系是什么？第第1414章章 数据库访问技术数据库访问技术 14.4 某校规定，超过全班平均成绩10%者可以享受一等奖学金，超过全班平均成绩5%者可以享受二等奖学金。试编制一个程序，使用Data数据控件，建立与存放学生成绩的Access数据库的连接，设数据库中包括“学号”、“姓名”、“成绩”三个字段。程序执行后，输出奖学金等级一览表。第第1414章章 数据库访问技术数据库访问技术 14.5 使用Data数据控件，结合Access数据库设计一个“通讯录”程序。程序启动后显示图14.28所示的界面，用户可以使用“姓名”和“地址”下拉列表框查询需要的记录。单击“更新”按钮时，显示图14.29所示的口令验证对话框。用户在正确回答了口令之后，显示网格式更新、删除、添加记录窗体，修改完毕后单击“更新”按钮将新数据写入数据库，单击“删除”按钮，将删除当前记录，将光标移到最后的空白记录处，输入新的数据可以添加记录。第第1414章章 数据库访问技术数据库访问技术 图14.28 程序启动时的界面 第第1414章章 数据库访问技术数据库访问技术 图14.29 验证更新权限口令 第第1414章章 数据库访问技术数据库访问技术 14.6 使用ADO控件设计一个数据库管理程序，使之具有浏览、更新、添加和删除记录的功能。程序启动时界面如图14.30所示，单击ADO控件的对应按钮，可以浏览数据表中的内容。单击“添加”按钮，出现图14.31所示的空记录界面，输入信息后在最后一个文本框“性别”文本框中按Enter键可继续添加记录，直到用户单击“更新”按钮。第第1414章章 数据库访问技术数据库访问技术 图14.30 程序启动时的界面 第第1414章章 数据库访问技术数据库访问技术 图14.31 添加记录 第第1414章章 数据库访问技术数据库访问技术 单击“删除”按钮，程序显示警告，确认后将删除当前记录，如图14.32所示。用户修改或添加了记录之后，单击“更新”按钮时将最后的更新一次性地写入数据表，如图14.33所示。第第1414章章 数据库访问技术数据库访问技术 图14.32 删除记录 第第1414章章 数据库访问技术数据库访问技术 图14.33 更新记录