VB数据库应用实例教程.pptx
常见的数据库有Microsoft Access、Microsoft SQL SERVER、Oracle、Sybase。以下是数据库中常用的术语：记录（Record）：记录是存放数据的基本单位，一个记录就是一条完整的信息；字段（Field）：每个记录由若干字段组成；数据表（Table）：记录的集合构成一个数据表；数据库（Database）：若干数据表构成一个数据库。常用数据库访问技术：（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中不能直接访问的函数。第1页/共14页任务1 数据浏览窗口的设计 任务要求 设计一个数据浏览窗口，功能包括：（1）使用多个文本框显示数据表当前记录信息；（2）使用表格显示数据表多条记录信息；（3）提供【首记录】、【上一记录】、【下一记录】、【最后记录】、【指定记录】功能按钮，并且具有判断记录越界的功能；（4）表格与文本框具有关联功能；（5）动态显示总记录数和当前记录。实现的数据浏览窗口如图所示：第2页/共14页任务1 数据浏览窗口的设计 准备工作 1Adodc控件 选择【工程】的【部件(0)】选项即可打开“部件”对话框，找到并选中选中“Microsoft ADO Data Controls 6.0(OLEDB)”即可Adodc控件添加到工具箱中。工具箱中的Adodc控件为：2DataGrid控件 选择【工程】的【部件(0)】选项即可打开“部件”对话框，找到并选中选中“Microsoft DataGrid Controls 6.0(OLEDB)”即可将DataGrid控件添加到工具箱中。工具箱中的DataGrid控件为：第3页/共14页任务1 数据浏览窗口的设计 准备工作 3数据表Student的属性、类型和宽度等信息如表所示：设计步骤见课本P132属性说明类型宽度备注xuehao学号字符10NOT NULL，主键xingming姓名字符8NOT NULLxingbie性别字符2NULLcsny出生年月日期时间型8NULLsyd生源地字符10NULLzzmm政治面貌字符10NULLMz民族字符10NULLBt补贴数值型7,2NULL第4页/共14页任务2 数据维护窗口的设计 任务要求 设计一个数据维护窗口，功能包括：（1）使用多个文本框显示数据表当前记录信息；（2）使用表格显示数据表多条记录信息；（3）提供【首记录】、【上一记录】、【下一记录】、【最后记录】功能按钮，并且具有判断记录越界的功能；（4）各按钮之间、表格与文本框之间具有关联功能；（5）动态显示总记录数和当前记录；（6）具有【添加记录】和【修改记录】功能按钮，操作时具有完整性约束功能，如学号和姓名不能为空，学号为8位等；另外，操作时用户可以通过点击【确定】按钮确定相应的改动，点击【取消】按钮取消所做的修改；（7）具有【删除记录】功能按钮，提示用户是否删除选定记录；确定后删除选定的记录；第5页/共14页任务2 数据维护窗口的设计 任务要求 （8）用户可以将以“学号.jpg”为文件存储在固定的文件夹下，如程序目录下的“picture”文件夹下，系统会自动读取该图像文件并加入到学生信息维护窗口中的image控件中。另外，删除学生时自动将该文件删除；（9）录入常用数据时，如“政治面貌”、“民族”和“生源地”等信息，采用组合框让用户方便选择；（10）录入时间时，采用日历控件进行录入，避免录入格式出错。实现的数据维护窗口如图所示：第6页/共14页任务2 数据维护窗口的设计 准备知识 1FSO对象模型 文件系统对象（File System Object，FSO）模型提供了一整套对文件系统进行管理和操作的方法和属性。包括创建、移动、改变或删除文件夹（目录）和文件，以及获得驱动器的信息和操作驱动器。2文件系统对象FileSystemObject对象 FileSystemObject对象是FSO模型中的核心对象，在应用程序中使用FSO的主要步骤是：创建一个FileSystemObject对象。根据应用程序的需要，通过调用FileSystemObject对象中的方法来创建一个新的对象。通过读取新对象的属性值获取用户所需的信息或利用对象的方法进行所需的操作。（1）创建FileSystemObject对象 创建FileSystemObject对象有两种方法：方法1：使用New关键字声明一个变量为FileSystemObject对象类型。使用格式如下：Dim As New FileSystemObject第7页/共14页任务2 数据维护窗口的设计 准备知识 方法2：使用CreateObject方法创建一个FileSystemObject对象，使用格式如下：Set =CreateObject(“Scripting.FileSystemObject”)（2）FileSystemObject对象的属性 FileSystemObject的属性只有Drives，这是系统中所有Drive对象的对象集合，用户可以获取当前计算机系统中所有驱动器的信息。如：Dim fs,d,dc,s Set fs=CreateObject(Scripting.FileSystemObject)Set dc=fs.Drives s=该计算机中有以下驱动器&vbCrLf For Each d In dc s=s&d.DriveLetter&驱动器 s=s&vbCrLf Next MsgBox s 运行结果如图所示：第8页/共14页任务2 数据维护窗口的设计 准备知识 （3）FileSystemObject对象的方法方法名操作类型语法格式CopyFile复制文件对象名.CopyFile 源文件 目标文件,存在的文件是否覆盖是 True时文件将被覆盖；如果是 False，不被覆盖；缺省值是 TrueCopyFolder复制文件夹对象名.CopyFolder 源文件夹 目标文件夹,存在的文件夹是否覆盖CreateFolder创建文件夹对象名.CreateFolder CreateTextFile创建文本文件对象名.CreateTextFile DeleteFile删除文件对象名.DeleteFile,文件属性为只读是否删除DeleteFolder删除文件夹对象名.DeleteFolder,文件夹属性为只读是否删除DeleteFolder方法不管指定的文件夹中是否有内容，它都被删除DriveExists指定驱动器是否存在对象名.DriveExists 对于可删除介质的驱动器，即使没有介质存在，DriveExists 方法也返回 True。可使用 Drive 对象的 IsReady 属性确定驱动器是否准备好。FileExists指定文件是否存在对象名.FileExists FolderExists指定文件夹是否存在对象名.FolderExists GetDrive返回与该驱动器相对应的Drive对象对象名.GetDrive GetFolder返回与该文件夹相对应的Folder对象对象名.GetFolder GetFile返回与该文件相对应的File对象对象名.GetFile MoveFile移动文件对象名.MoveFile 源文件 目标文件MoveFolder移动文件夹对象名.MoveFolder 源文件夹 目标文件夹第9页/共14页任务2 数据维护窗口的设计 准备知识 3MonthView控件 选择【工程】的【部件(0)】选项即可打开“部件”对话框，找到并选中选中“Microsoft Windows Common Controls-2 6.0(SP3)”即可将MonthView控件添加到工具箱中。工具箱中的MonthView控件为：4数据表Student的属性、类型和宽度等信息如表所示：属性说明类型宽度备注Xuehao学号字符10NOT NULL，主键xingming姓名字符8NOT NULLXingbie性别字符2NULLCsny出生年月日期时间型8NULLSyd生源地字符10NULLZzmm政治面貌字符10NULLMz民族字符10NULLBt补贴数值型7,2NULLZp照片字符20NULL第10页/共14页任务2 数据维护窗口的设计 准备知识 5生源地表syd的属性、类型和宽度等信息如表所示：属性说明类型宽度备注Code代码字符6NOT NULL，主键sydname生源地名称字符20NOT NULL6民族表mz的属性、类型和宽度等信息如表所示：属性说明类型宽度备注Code代码字符2NOT NULL，主键mzname民族名称字符20NOT NULL7政治面貌表zzmm的属性、类型和宽度等信息如表所示：属性说明类型宽度备注Code代码字符2NOT NULL，主键zzmmname政治面貌名称字符20NOT NULL设计步骤 见课本P140第11页/共14页任务3 数据查询窗口的设计 任务要求 设计一个数据查询窗口，功能包括：（1）可选择查询字段；（2）提供等于“=”、大于“”、大于等于“=”、小于“”、小于等于“=”、不等于“”、字符串匹配“LIKE”、在两数之间“BetweenAnd”操作符；（3）根据选择的查询字段类型，响应不同的操作符；（4）判断输入查询条件的合法性，查询结果显示到DataGrid控件中。数据查询窗口运行结果如图所示：设计步骤 见课本P150第12页/共14页任务4 数据输出到Excel 任务要求 在本章任务3的数据查询窗口中加入“数据输出到Excel”的功能。运行结果如图所示：设计步骤 见课本P158第13页/共14页谢谢您的观看！第14页/共14页
