Visual Basic程序设计项目化案例教程 作者 王萍 8-13_ 第12章.pptVIP

　　一、案例效果　　本案例中共有两个窗体，程序运行后进入第一个窗体——信息浏览窗体，在该窗体上可以实现记录的修改、删除，还可以使用“第一条”、“上一条”、“下一条”、“最后一条”按钮方便地阅读数据库中的各条记录，并在操作不当时给出友好提示。当用户单击第一个窗体中的“添加”按钮时，进入第二个窗体——信息添加窗体，该窗体用来实现记录的添加。当记录添加成功后，会弹出“添加成功”的提示框；当记录添加不完整时，会弹出“信息添加不完全，请重新输入”的提示。　　本案例中两个窗体的界面设计如图12-1和图12-2所示。 　　二、技术分析　　本案例是一个综合项目设计案例，其中运用到了文本框、命令按钮、标签、窗体、ADO等控件，还运用到了Access数据库、多窗体连接、人机交互函数等技术。　　1．文本框控件　　本案例中运用了以下文本框控件的属性：　　(1) ?Text属性。该属性用于设置和获取文本框中显示的内容。　　(2) ?MaxLength属性。该属性用于设置和获取文本框中可以输入的文本的最大长度。当值为0时，用户可以输入任意长度的文本；当值为非0时，则为可以输入文本的字符个数，一个汉字相当于一个字符。 　　(3)? DataSource属性。该属性通过指定一个有效的数据控件将绑定控件连接到一个数据源上。例如，本案例中文本框与Adodc1相连，则文本框的DataSource属性值设置为Adodc1。　　(4) ?DataField属性。该属性用于将文本框和数据库中的某个字段绑定，这样该文本框只能用于显示数据库中绑定字段的内容。例如，本案例中Text1绑定数据库中“学号”这一字段，所以Text1只能用于显示数据库中各条记录的学号。 　　2．窗体控件　　本案例中运用了以下窗体控件的方法：　　(1)? Hide方法。该方法用来隐藏窗体，如隐藏窗体Form1可以表示为Form1.Hide。　　(2)? Show方法。该方法用来将隐藏的窗体显示，如将隐藏的窗体Form1显示可以表示为Form1.Show。 　　3．ADO数据控件　　ADO(ActiveX Data Object)数据访问接口是Microsoft处理数据库信息的新技术。它是一种ActiveX对象，采用了被称为OLE DB的数据访问模式，是数据访问对象DAO、远程数据对象RDO和开放数据库互连ODBC 3种方式的扩展。ADO对象模型定义了一个可编程的分层对象集合，包括Connection、Command、Recordset 3个对象。3个对象的主要功能如表12-1所示。 　　1) ?Connection对象　　Connection对象又称连接对象，主要用来建立与数据库的连接。只有建立连接后，才能使用Command对象和Recordset对象来对数据库进行各种操作。　　(1) 建立Connection对象。在Visual Basic 6.0中建立一个新对象使用以下语法格式：　　Dim对象名 As New 对象类型　　如：Dim Conn As New ADODB.Connection　　(2) 打开与数据库的连接。可以用Open方法来打开数据库并与之建立连接。其语法格式如下：　　Connection对象．Open“参数1＝参数1的值；参数2＝参数2的值……”　　其参数及意义如表12-2所示。 　　(3) ?Connection对象的方法。　　① Open方法。该方法用来建立与数据库的连接。只有用Open方法和数据库建立连接后，才可以继续进行各种操作。　　② Close方法。该方法用来关闭一个已打开的Connection对象及其相关的各种对象。它的作用主要是切断与数据库之间的连接通道。 　　2) ?Recordset对象　　Recordset对象又称记录集对象，当用Command对象或Connection对象执行查询命令后，就会得到一个记录集对象，该对象包含满足条件的所有记录。利用Recordset对象还可以实现删除、添加或更新操作。　　(1) 建立Recordset对象。使用Recordset对象前必须先建立该对象。建立一个名称为Rst的Recordset对象的语句格式如下：　　　Set Rst＝New ADODB.Recordset 　　(2) 打开记录集。可以用Open方法打开一个记录集，其语法格式如下：　　Recordset 对象．Open ［Source］，［ActiveConnection］，［CursorType］，［LockType］，［Opeions］　　其各参数说明请查阅相关资料，这里不作说明。　　(3) ?Recordset对象的常用属性。　　① RecordCount属性。该属性用来返回记录集中的记录总数，其语法