VB数据库应用实例教程.ppt

Visual Basic 6.0实用技术第四章第四章 数据库应用实例数据库应用实例 1大家好Visual Basic 6.0实用技术o常见的数据库有Microsoft Access、Microsoft SQL SERVER、Oracle、Sybase。o以下是数据库中常用的术语：记录（Record）：记录是存放数据的基本单位，一个记录就是一条完整的信息；字段（Field）：每个记录由若干字段组成；数据表（Table）：记录的集合构成一个数据表；数据库（Database）：若干数据表构成一个数据库。o常用数据库访问技术：（1）DAO（Data Access Object）数据访问对象：DAO是Microsoft Jet数据库引擎数据访问对象，是第一个面向对象的接口，有着极为广泛的应用。（2）ODBC是一种底层数据访问技术，允许Visual Basic通过ODBC连接到其他数据库。（3）OLE DB(Object Linking and Embedding Database)是新的低层接口，Microsoft将用它取代ODBC作为连接数据库的主要低层数据访问技术。（4）ADO是新近发展的数据库访问技术，ADO提供了在OLE DB中不能直接访问的函数。2大家好Visual Basic 6.0实用技术任务任务1 数据浏览窗口的设计数据浏览窗口的设计 o任务要求任务要求 设计一个数据浏览窗口，功能包括：（1）使用多个文本框显示数据表当前记录信息；（2）使用表格显示数据表多条记录信息；（3）提供【首记录】、【上一记录】、【下一记录】、【最后记录】、【指定记录】功能按钮，并且具有判断记录越界的功能；（4）表格与文本框具有关联功能；（5）动态显示总记录数和当前记录。实现的数据浏览窗口如图所示：3大家好Visual Basic 6.0实用技术任务任务1 数据浏览窗口的设计数据浏览窗口的设计 o准备工作准备工作 1Adodc控件 选择【工程】的【部件(0)】选项即可打开“部件”对话框，找到并选中选中“Microsoft ADO Data Controls 6.0(OLEDB)”即可Adodc控件添加到工具箱中。工具箱中的Adodc控件为：2DataGrid控件 选择【工程】的【部件(0)】选项即可打开“部件”对话框，找到并选中选中“Microsoft DataGrid Controls 6.0(OLEDB)”即可将DataGrid控件添加到工具箱中。工具箱中的DataGrid控件为：4大家好Visual Basic 6.0实用技术任务任务1 数据浏览窗口的设计数据浏览窗口的设计 o准备工作准备工作 3数据表Student的属性、类型和宽度等信息如表所示：设计步骤见课本P1325大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o任务要求任务要求 设计一个数据维护窗口，功能包括：（1）使用多个文本框显示数据表当前记录信息；（2）使用表格显示数据表多条记录信息；（3）提供【首记录】、【上一记录】、【下一记录】、【最后记录】功能按钮，并且具有判断记录越界的功能；（4）各按钮之间、表格与文本框之间具有关联功能；（5）动态显示总记录数和当前记录；（6）具有【添加记录】和【修改记录】功能按钮，操作时具有完整性约束功能，如学号和姓名不能为空，学号为8位等；另外，操作时用户可以通过点击【确定】按钮确定相应的改动，点击【取消】按钮取消所做的修改；（7）具有【删除记录】功能按钮，提示用户是否删除选定记录；确定后删除选定的记录；6大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o任务要求任务要求 （8）用户可以将以“学号.jpg”为文件存储在固定的文件夹下，如程序目录下的“picture”文件夹下，系统会自动读取该图像文件并加入到学生信息维护窗口中的image控件中。另外，删除学生时自动将该文件删除；（9）录入常用数据时，如“政治面貌”、“民族”和“生源地”等信息，采用组合框让用户方便选择；（10）录入时间时，采用日历控件进行录入，避免录入格式出错。实现的数据维护窗口如图所示：7大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o准备知识准备知识 1FSO对象模型 文件系统对象（Object，FSO）模型提供了一整套对文件系统进行管理和操作的方法和属性。包括创建、移动、改变或删除文件夹（目录）和文件，以及获得驱动器的信息和操作驱动器。2文件系统对象对象 对象是FSO模型中的核心对象，在应用程序中使用FSO的主要步骤是：创建一个对象。根据应用程序的需要，通过调用对象中的方法来创建一个新的对象。通过读取新对象的属性值获取用户所需的信息或利用对象的方法进行所需的操作。（1）创建对象 创建对象有两种方法：方法1：使用New关键字声明一个变量为对象类型。使用格式如下：Dim As New 8大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o准备知识准备知识 方法2：使用CreateObject方法创建一个对象，使用格式如下：Set =CreateObject(“Scripting.”)（2）对象的属性 的属性只有Drives，这是系统中所有Drive对象的对象集合，用户可以获取当前计算机系统中所有驱动器的信息。如：Dim fs,d,dc,s Set fs=CreateObject(Scripting.)Set dc=fs.Drives s=该计算机中有以下驱动器&vbCrLf For Each d In dc s=s&d.DriveLetter&驱动器 s=s&vbCrLf Next MsgBox s 运行结果如图所示：9大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o准备知识准备知识 （3）对象的方法10大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o准备知识准备知识 3MonthView控件 选择【工程】的【部件(0)】选项即可打开“部件”对话框，找到并选中选中“Microsoft Windows Common Controls-2 6.0(SP3)”即可将MonthView控件添加到工具箱中。工具箱中的MonthView控件为：4数据表Student的属性、类型和宽度等信息如表所示：11大家好Visual Basic 6.0实用技术任务任务2 数据维护窗口的设计数据维护窗口的设计 o准备知识准备知识 5生源地表syd的属性、类型和宽度等信息如表所示：6民族表mz的属性、类型和宽度等信息如表所示：7政治面貌表zzmm的属性、类型和宽度等信息如表所示：设计步骤设计步骤 见课本见课本P14012大家好Visual Basic 6.0实用技术任务任务3 数据查询窗口的设计数据查询窗口的设计 o任务要求任务要求 设计一个数据查询窗口，功能包括：（1）可选择查询字段；（2）提供等于“=”、大于“”、大于等于“=”、小于“”、小于等于“=”、不等于“”、字符串匹配“LIKE”、在两数之间“BetweenAnd”操作符；（3）根据选择的查询字段类型，响应不同的操作符；（4）判断输入查询条件的合法性，查询结果显示到DataGrid控件中。数据查询窗口运行结果如图所示：设计步骤设计步骤 见课本见课本P15013大家好Visual Basic 6.0实用技术任务任务4 数据输出到数据输出到Excel o任务要求任务要求 在本章任务3的数据查询窗口中加入“数据输出到Excel”的功能。运行结果如图所示：设计步骤设计步骤 见课本见课本P15814大家好结束15大家好