使用vb数据控件访问数据库.pptVIP

10.11 使用 VB 数据控件访问数据库 VB 提供了多种访问数据库的方式，其中数据控件 (Data) 是一种使用简便、处理快速的标准控件 1. 数据控件的用途 利用 Data 控件可以建立应用程序与数据库的联系，操作数 据库中的数据，还能利用文本框、列表框等控件，实现数据 的浏览、编辑等功能。 2. 与添加其他控件的方法一样，其外观如下： 四个箭头按钮的作用 3. (1) Connect 属性：数据控件所链接的数据库数据类型 默认为 Access ，还支持 FoxPro 、 Excel 等。 (2) DataBaseName 属性：数据库名称 (3) RecordSource 属性：记录来源，数据表名或查询名 (4) RecordSetType 属性：记录的类型 0 —— Table( 表类型 ) 1 —— Dynaset( 动态集，一至多个表，读写 ) 2 —— Snapshot( 快照集，一至多个表，只读 ) (5) Exculsive 属性：是否独占 ( 不允许共享 ) (6) ReadOnly 属性：是否只读 (7) BOFaction 和 EOFaction 属性：指定移动到文件头和文件尾 要执行的操作 4. (1) AddNew 方法：添加一条新记录。采用默认字段值 ( 或空白 ) 示例： Data1.Recordset.Addnew (2) Delete 方法：删除当前记录。 (3) Edit 方法：对当前记录进行编辑修改 (4) Find 方法集：在记录集中查找符合条件的记录 FindFirst 查找符合条件的第一个记录 FindLast 查找符合条件的最后一个记录 FindPrevious 查找符合条件的上一个记录 FindNext 查找符合条件的下一个记录 示例： Data1.Recordset.First “ 学号 =‘951009” If Data1.Recordset.NoMatch Then MsgBox “ 找不到 951009 号学生” End If (5) Move 方法集：在记录集中移动记录指针 MovedFirst 移至第一个记录 MoveLast 移至最后一个记录 MovePrevious 移至上一个记录 MoveNext 移至下一个记录 (6) Update 方法：更新记录内容 (7) UpdateControls 方法：恢复记录的原先值 5. 常用事件 (1) Reposition 事件：当某一记录成为当前记录之后触发此事 件 (2) Validate 事件：当某一记录成为当前记录之前触发此事件 6 . 数据绑定 把数据控件与某个数据库关联起来，再通过数据绑定控 件来显示、编辑和更新数据库中的数据 两者数据保持一致性 (1) 通过数据控件的 Connect 、 DataBaseName 和 RecordSource 属性可以实现数据控件与数据库关联 (2) 具有 DataSource 属性的控件，如文本框、标签、复选 框等都可以作为常用的数据绑定控件 例 10.13 应用数据绑定功能，实现对 Excel 数据清单的查询 Excel 数据清单 (C:\My Documents\ 成绩单 .xls) 内容如下： (1) 创建应用程序的用户界面 (2) 设置对象属性 设置数据控件 Data1 ： Connect 属性为 Excel8.0 DataBaseName 属性为 C:\My Documents\ 成绩单 .xls RecordSource 属性为 Sheet1$ ( 工作表名 ) 设置文本框 (Text1-Text4) ： 对应“成绩单 .xls” 的 4 个字段 DataSource 属性为 Data1 DataField 属性分别为“学号”、“姓名”、“成绩”和 “班号” (3) 不需要加入程序代码 通过属性实现关联和绑定，就可以进行查询操作 例 10.14 对 Excel 数据清单进行查询、添加及修改操作 采用例 10.13 的 Excel 数据清单 (C:\My Documents\ 成绩单 .xls) (1) 创建应用程序的用户界面 (2) 设置对象的属性（与例 10.13 基本相同 ) 数据控件 Data1 的 ReadOnly 属性为 False( 允许改动 ) 三个命令按钮名为 Command1-Command3 (3) 程序代码 Private Sub Command1_Click() ‘ 新增 s = 獍?硯尨 输入新记录 , 按数据控件上的箭头按钮保存 , _ vbOKCancel, 新增记录 ) If s = vbOK Then Text1.S