转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 数据库 >> Access >> 正文
VB通过DAO访问Access数据库         ★★★★

VB通过DAO访问Access数据库

作者:闵涛 文章来源:闵涛的学习笔记 点击数:718 更新时间:2009/4/22 21:22:55
Visual Basic对Access数据库的集成非常紧密,通常由以下几个部分组成。

  引用DAO类型库


  1、从“工程”菜单中选择“引用”菜单项;

  2、在可引用列表框中选择“Microsoft DAO 3.51 Object Library”项。

  3、最后“确定”即可

  设置DAO数据类型变量

  DAO数据类型变量共分成两种:

  1、Database变量

  对应于Access数据库,通常在模块中被定义为Public全程变量:

  Public AccessDBF As Database

  '定义数据库对象实例AccessDBF

  2、RecordSet变量

  对应于Access数据库中的一个表,可定义为全程变量或局部变量,亦可作为函数参数进行传递:

  Dim thePrintTable As RecordSet

  '定义一个表对象实例thePrintTable

  打开DAO数据类型

  1、打开Access的方法

  通常可设置一个专门的Public函数用来打开一个Access数据库,并且该函数在启动窗体的Private Sub Form_load ( )过程中被调用,函数定义格式如下:

  Public Sub OpenDatabase ( )

  Dim sConeect As String

  SConnect = ";PWD = 8830428; UID = admin "

  '设置打开时的用户名、口令等参数

  Set AccessDBF = Nothing

  '确认关闭对象实例

  Set AccessDBF = WorksPaces (0 ).OpenDatabase (App.Path&&"/ToXls.MDB",False,sConnect)

  '打开当前路径的ToXls.MDB数据库

  End Sub

  2、打开RecordSet的方法

  RecordSet遵循即用即开的原则,所以它通常在函数中打开

  Set thePrintTable = AcessDBF.OpenRecordSet ( "Table_1",dbOpenSnapshot )

  相关的数据操作

  数据实际需要对Access表中的记录、字段、数据项进行操作。下列双重循环把数据输出到Excel对应的单元格中:

  For j = 0 To 2

  For I = 0 To 3

  ThePrintTable.MoveNext

  Excel.Sheet.Range ( Trim ( chr ( 71+j*10+I ) )+"G").Value = thePrintTable.Fields (0)

  Next I

  Next j

  关闭数据库

  1、关闭Database

  它通常在整个应用程序的最后进行操作,即通常出现在Private Sub Form_unload (Cannel As Interger )过程中。命令格式实例如下:

  AccessDBF.Close

  2、关闭RecordSet

  它遵循用完即关的原则,所以通常出现在函数中。当完成了相关的数据操作后就关闭它,下次再用时再打开即可:

  thePrintTable.Close

  结论:通过系统集成开发应用程序的输入和输出模块,它一方面充分利用了OLE对象程序的优点,轻松完成人机界面设计,使程序员从繁琐而又简单的点、线、框等定位中脱离出来;另一方面,由于充分利用了用户操作熟练的软件作为人机界面,使用户有亲切感和熟练操作的能力,从而能够充分发挥所开发的应用程序的功能。


[电脑应用]用C#动态创建Access数据库  [Web开发]asp 在线备份与恢复sqlserver数据库代码详解
[电脑应用]教你如何远程管理MSSQL数据库  [其他]手工升级ACCESS到SQLSERVER方法详解
[其他]关于数据库优化查询计划的方法总结  [Web开发]把ACCESS的数据导入到Mysql中的方法详解
[电脑应用]Linux数据库大比拚  [JAVA开发]Java连接各种数据库的实例
[聊天工具]QQ IP数据库Build 0825 纯真版__天极Yesky  [系统软件]利用crontab系统每天定时备份MySQL数据库
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · Sql Server  · MySql
    · Access  · ORACLE
    · SyBase  · 其他
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台