VisualBasic程序设计与实训教程第12章数据库开发.pdfVIP

第12章数据库访问 第12章数据库访问 12.1 数据库基本知识 12.2 数据库的创建 12.3 Data控件及应用 12.4 ADO Data控件及应用 12.5 SQL语言 12.6 ADO对象及应用 2013-3-8 1 清华大学出版社 【目的要求】 1.了解数据库的基本理论知识； 2. 了解data控件操作数据库的方法； 3. 了解Dao对象创建数据库的方法； 4 .掌握SQL语句在高级语言中的书写方法； 5 .掌握ADO控件的基本属性和操作数据库的基本方法； 6 .掌握ADO对象的基本结构和对数据库的操作方法。 【重点】 ADO对象的层次结构与常用对象的属性、方法 ADO对象操作数据库的基本方法 2013-3-8 清华大学出版社 2 12.1 数据库基本知识 12.1 数据库基本知识 12.2 数据库的创建 12.2.1 利用可视化数据管理器（VisData ）创建数据库 注意： VB所提供的【可视化数据管理器】创 建数据库的方法，在实际使用中，操作很 不方便，并且该方法所创建的Access数据 库版本低。在实际应用中时应使用现在流 行的Access2002来创建数据库。高版本的 Access数据库不能被data控件识别。 2013-3-8 清华大学出版社 3 12.2.2 用DAO对象创建数据库 1、对DAO对象的引用 2013-3-8 清华大学出版社 4 【例12.1】用DAO对象来创建数据库student.mdb 。 Dim MyData As Database Dim MyTable As TableDef Dim MyField As Field Set MyData = Workspaces(0).CreateDatabase(e:\student.mdb, dbLangGeneral, dbversion70) Set MyTable = MyData.CreateTableDef(jbqk) Set MyField = MyTable.CreateField(学号, dbText, 6) MyTable.Fields.Append MyField Set MyField = MyTable.CreateField(姓名, dbText, 10) MyTable.Fields.Append MyField Set MyField = MyTable.CreateField(性别, dbText, 10) 2013-3-8 清华大学出版社 5 MyTable.Fields.Append MyField Set MyField = MyTable.CreateField(班级, dbText, 20) MyTable.Fields.Append MyField Set MyField = MyTable.CreateField(英语, dbInteger) MyTable.Fields.Appe