|
摘要: VB具有强大的数据操纵功能，不仅能创建数据库文件，还能利用ADO Data控件实现与数据库的连接，通过一些绑定控件来显示数据库中的有关内容，并能开发出实用的数据管理系统。该文详细介绍了VB数据控件的属性，实现与数据库连接的方法、步骤，列举一些简单应用的编程代码。 关键词：VB集成环境；属性；ADO Data控件；数据库连接；数据绑定控件 中图分类号：TP391文献标识码：A文章编号：1009-3044(2012)24-5758-03 Achieve a Database Connection and Its Simple Application Based on the ADO Data Control ZHU De-ge (Computer Center, Yancheng Institute of Technology, Yancheng 240053,China) Abstract: VB has a powerful data manipulation functions . Not only can create a database file, still can use ADO Data control to realize the connection with database .Through some bound controls to display database content about and the development of practical data manage ment system .This paper introduces the VB data control properties ,realization of database connection with the methods, steps, list some sim ple application programming code . Key words:VB integrated environment ;attribute ;ADO data control ;database connection ;data bound controls 1在VB中利用“可视化数据管理器”创建数据库 1)建立数据库文件yczdgwcf和表zdgwcf 在VB中，单击“外接程序”－“可视化数据管理器”－在“VisData窗口”中－“文件”－“新建”－“Microsoft Access－版本7.0 MDB（7）”－输入“数据库文件名（yczdgwcf.mdb）、选择保存位置”－点击“保存”－右击“数据库窗口”空白处－“建表（T）”－“表结构”－输入“表名称（zdgwcf）”－点击“增加字段”－输入“名称、类型、长度”－“确定”－“关闭”－“生成表”。 2)建立数据表、输入数据记录 进入“VisData窗口”－文件－“打开数据库－Microsoft Access(M)…”－找到已有的数据库文件－双击数据表或右击数据表（zdg? wcf）－“打开”－“添加”－在各字段中输入记录数据－“更新”－“关闭”。记录内容如下表1： 表1 2 ADO技术与ADO Data控件概述 ADO是ActiveX Data Object的简称,它是OLE DB的一种开发接口,OLE DB是一种开放规范,用于在开放式数据库连接(ODSC)上创建应用编程接口(API)。它通过OLE DB作为数据提供者对任何格式存储的任何数据进行访问和操作。 ADO数据控件提供了实现VB应用程序与数据库的连接功能，通过编程或结合其他绑定控件可方便地访问数据库中各种数据。ADO Data控件是ActiveX控件，用前把它添进工具箱，选择“工程”－“部件”－“Microsoft ADO Data control6.0(OLEDB)”－“确定”即可。 3设置ADO Data控件属性，实现与数据库的连接 ADO Data控件使用ADO可快速地创建与数据库连接，它重要的两个属性是ConnectionString（连接字符串）和Recordsource（记录源）。 1)连接数据源：ConnectionString设置控件的连接字符串，用于建立与数据库的连接。 在控件“属性窗口”中，单击ConnectionString属性右边的“…”按钮，在弹出“属性页”－“通用”选项卡中选择第三种方式“使用连接字符串”，点击“生成”，打开“数据链接属性”对话框，在“提供程序”中选择“Microsoft jet 4.0 OLE DB Provider”项，单击“下一步”或打开“连接”选项卡，指定要链接的库文件。单击“测试连接”按钮，测试成功则关闭。 2)确定记录源RecordSource属性 同样在“属性窗口”中，单击RecordSource属性右边的“…”按钮，出现“属性页”对话框，在记录源“命令类型”中选“2－adcmdta? ble”，在“表或存储过程名称”中选yczdgwcf.mdb数据库中的“zdgwcf”表，关闭记录源属性页，这样完成了ADO数据控件与access数据库的连接工作。 4建立数据绑定控件并设置其属性，使其显示数据库中数据内容 通过上面设置，ADODC1控件具有“打开”数据库能力，但它没有“显示”功能，为此我们要借助数据绑定控件了。 图1 常见数据绑定控件有：文本框Text、表格控件MSFlexGrid、数据网格控件DataGrid等，这些数据绑定控件使用前也要通过：“工程”－“部件”－选择“Microsoft DataGrid control6.0(OLEDB)”将它添加进工具箱中添加一个绑定控件后，主要设置其属性DataSource和DataField以显示数据，它们可以在属性窗口设置，也可以在代码里设置。 DataSource属性：用于指定控件连接数据库时使用的数据源。 DataField属性：指定一个由数据源创建的Recordset对象中的合法字段名。即通过该属性可以确定绑定的控件显示的是哪个字段的值。 例如设数据绑定控件Datasource的属性值为adodc1，就可将DataGrid1绑定到数据控件Adodc1上。这样DataGrid才能正常显示Adodc打开数据表的内容。如上图1。 DataGrid1允许用户同时浏览或修改多个记录的数据。 5数据访问应用代码的编写 其实，使用ADO编辑、查看记录，不需要编写任何代码。但为了支持更高级的使用，则需要编写代码，如添加、删除、修改、查找记录等都需要编写代码驱动。 1)添加记录代码 Private Sub Command1_Click() Adodc1.Recordset.AddNew ’添加新纪录 Adodc1.Recordset("姓名").Value = Text1.Text End Sub 2)修改（或提交）记录代码 Private Sub Command2_Click() ’提交或修改记录 Adodc1.Recordset.Update ’保存 Adodc1.Refresh ’刷新 End Sub 3)浏览（查找）记录代码 Private Sub sjl_Click()’首记录按钮 Adodc1.Recordset.MoveFirst End Sub Private Sub down_Click()’下一条记录 Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End If End Sub Private Sub up_Click()’上一条记录按钮 Adodc1.Recordset.MovePrevious If Adodc1.Recordset.BOF Then Adodc1.Recordset.MoveFirst End If End Sub Private Sub mjl_Click()’末记录 Adodc1.Recordset.MoveLast End Sub 4)删除记录代码 Private Sub Command7_Click()’删除记录 Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext If (Adodc1.Recordset.BOF Or Adodc1.Recordset.EOF) Then MsgBox "数据表中已经无记录，无法删除记录了", , "提示" End If End Sub 随着创新技术的不断发展，程序开发越来越便捷，相信不久，会有更好更实用的数据处理技术问世。 参考文献： [1]牛又奇,孙建国.Visual Basic程序设计教程[M].苏州:苏州大学出版社,2010. [2]吐尔尼沙.热依木.VB中ADO对象访问数据库编程方法[J].科技创新导报,2007. |
|
|
