Visual Basic数据库编程.pptVIP

Visual Basic数据库编程 主讲:贺金平 概述 Visual Basic作为应用程序的开发“利器”也表现在数据库应用程序的开发上，它良好的界面和强大的控件功能使数据库编程变得简单多了。 不仅要求学习者熟悉VB中关于数据库编程方面的知识还要了解数据库的知识。 VB中可以联接的数据库类型 在Visual Basic中通过数据访问控件或数据访问对象（DAO）可以访问下列数据库： 1． JET数据库，即Microsoft Access 2． ISAM数据库，如：dBase，FoxPro等 3． ODBC数据库，凡是遵循ODBC标准的客户/服务器数据库。如：Microsoft SQL Server、Oracle 数据库的选择 一般来说，如果要开发个人的小型数据库系统，用Access、 dBase和FoxPro数据库比较合适， 要开发大、中型的数据库系统用ODBC数据库更为适宜。 Acces数据库与VB的联接 Access数据库有两种方法： 一是在Microsoft Access中建立数据库。点击“新建”按钮就可以建立新的表了。 第二种方法：使用可视化数据管理器，不需要编程就可创建数据库。可视化数据管理器(Visdata .exe)是一个非常有用的应用程序，它是VB企业版和专业版附带的，在安装目录下。 DATA数据控件 属性 CONNECT属性 指定打开的数据库类型，并且包括参数，如用户和口令等。 例如：打开Access数据库（缺省） CONNECT=“ACCESS” 打开ODBC数据库 CONNECT=“ODBC；DATABASE=？？；UID=？？；PWD=？？；DSN=？？” DATABASENAME属性 确定数据控件访问哪一个数据库。 对于多表数据库它为具体的数据库文件名，例如：ACCESS数据库 DATABASENAME=“D：\...\DEMO.MDB 　　对于单表数据库它为具体的数据库文件所在的目录，而具体文件名放在RECORDSOURCE属性中， 例如:访问FOXPRO数据库文件D：\FOX\DEMO.DBF DATABASENAME=“D:\FOX” RECORDSOURCE=“DEMO”不带文件扩展名 RECORDSOURCE属性 确定数据控件的记录集,即:所要访问的数据内容。它可以是一个表名、存储查询名或SQL语句。例如：访问Register表所有数据 ： RECORDSOURCE=“Register”访问RC表中1973年以前出生的数据： RECORDSOURCE=“SELECT *FROM Register WHERE [BIRTHDAY]#1/1/1973# 注意：当我们在运行时修改了该属性后，需要调用REFRESH方法刷新记录集。 方法 REFRESH方法 当在运行时修改了RecordSource属性后，需要调用该方法刷新记录集。 UPDATERECORD方法 将绑定在数据控件上的控件的数据写入数据库中。即:当我们修改了数据后调用该方法确定修改。 CANCELUPDATE方法 将数据库中的数据重新读到绑定在数据控件上的控件中。即:当我们修改了数据后调用该方法放弃修改。 事件 　　VALIDATE事件 当我们移动记录集记录指针时发生。例如：我们将记录集记录指针从A移动到记录B时当产生VALIDATE事件时，记录指针仍在记录A上。 Sub XXXX_Validate（Action As integer，Save As integer） 其中： Action 指出如何产生了该事件，如：移动，增加，查询等。 Save 表示是否保存已修改的数据。当我们修改了绑定在数据控件的数据，又没有UPDATERECORD，则移动指针时，Save=True。如果在事件中令Save=False，则放弃修改。 例如： Sub XXXX_Validate(Action As integer,Save As integer) If Save then I= MsgBox(Dada changed,Save?,vbYesNo) If I = vbNo then Save = False End if End if End Sub Reposition事件 当我们移动记录集指针时发生。例如：我们将记录集记录指针从A移动到记录B 时，当产生Reposition事件时，记录指针已移动到B上。 通常我们在该事件中显示当前的指针位置。例如： Sub XXXX_Reposition() XXXX.Caption=?? XXXX.RecordSet.AbsolutePosition + 1 End Sub Data链接Access数据库 在DATA控件的CONNECT属性中，选中“ACCESS”项，在DatabaseName属性中，输入