使用ADO.NET解锁MicrosoftAccess数据

发表于:2007-05-25来源:作者:点击数: 标签:解锁ADO.NET使用
使用 ADO.NET 解锁 Microsoft Access 数据 Paul Cornell Microsoft Corporation 2001 年 12 月 6 日 Microsoft Office 提供了多种存储和管理数据的功能和工具,例如,数据访问对象 (DAO)、ActiveX 数据对象 (ADO)、Microsoft Word 邮件合并、Microsoft Excel
使用 ADO.NET 解锁 Microsoft Aclearcase/" target="_blank" >ccess 数据
Paul Cornell
Microsoft Corporation
2001 年 12 月 6 日

Microsoft® Office 提供了多种存储和管理数据的功能和工具,例如,数据访问对象 (DAO)、ActiveX® 数据对象 (ADO)、Microsoft Word 邮件合并、Microsoft Excel Web 查询、Microsoft Query、数据访问页、Microsoft Access 数据项目、Office 数据连接、Office 数据链接等等。而 Microsoft .NET 平台则提供了其他的数据访问功能和工具,例如,ADO.NET、.NET 数据连接和数据库项目。

在本月的专栏中,我将介绍如何使用 Microsoft Visual Studio® .NET、Microsoft Visual Basic® .NET,特别是如何使用 ADO.NET 来解锁和管理 Microsoft Access 数据。

确定何时最适合使用 ADO.NET

既然 Office 已经提供了一系列数据访问功能和工具,为什么不利用 Office 来管理它自己的数据呢?当然,在许多情况下,您可能希望使用适合某个特定数据任务的内置 Office 功能和工具。然而,ADO.NET 提供了一种添加数据连接和编写数据解决方案代码的统一方法,这种方法不同于 Office 中的多个数据入口点和数据访问库。

如果您愿意,仍然可以在 Visual Studio .NET 和 Visual Basic .NET 中调用 ADO 功能。但鉴于以下原因,与 ADO 相比,ADO.NET 在许多方面都是更好的数据访问解决方案。

  • ADO.NET 允许在数据集中包含多个表,包括这些表之间的关系。ADO 只允许包含一个结果表(虽然此单个结果表可能是多个相关表上所执行的 JOIN 操作的结果)。
  • ADO.NET 提供断开连接的数据访问。ADO 也可以提供断开连接的数据访问,但 ADO 主要是为连接的数据访问而设计的。
  • ADO.NET 提供了一个记录导航范例,允许进行无序的数据访问(与有序的 ADO Move 方法不同),并可以利用数据表之间的关系访问各个数据表。
  • 因为 ADO.NET 使用 XML 传送数据,所以能够提供比 ADO 更丰富的数据类型,获得更好的数据访问性能,还可以使数据穿过防火墙传递。
  • ADO.NET 经过了高度优化,以配合 Microsoft SQL Server 7.0 和 Microsoft SQL Server 2000 数据库的使用(反映在 ADO.NET Sql 对象中),同时提供对其他 OLE DB 数据源(如 Microsoft Access 数据库)的编程访问(反映在 ADO.NET OleDb 对象中)。

当然,如果希望利用 .NET 中的诸多新功能,就应该使用 .NET 数据访问功能和工具。有关 .NET 平台的详细信息,请参阅以前的专栏 Introducing .NET to Office Developers(英文)。

ADO.NET 入门

图 1 显示了使用 ADO.NET 时要用到的主要对象。

图 1:ADO.NET 对象模型中的主要对象(来源:Inside .NET Managed Providers [英文])

这些对象包括:

  • OleDbConnection SqlConnection 对象,代表数据库连接,类似于 ADO 的 Connection 对象。
  • OleDbCommandSqlDbCommand 对象,代表将要直接发送到数据库的 SQL 文本字符串,类似于 ADO 的 Command 对象。
  • OleDbDataAdapterSqlDataAdapter 对象,用于保存数据库的 SELECT、INSERT、UPDATE 和 DELETE 命令。这些对象可以作为数据库和 DataSet 对象之间的中介。可以使用 Fill 方法填充 DataSet 对象并从数据库断开连接,然后使用 Update 方法重新连接到数据库,并将在 DataSet 对象中所做的更改保存回数据库。
  • DataSet 对象包含实际数据的副本,类似于断开连接的 ADO Recordset 对象。DataSet 对象可以包含 DataRelation 对象和 Contraint 对象,这两个对象分别代表数据表之间的关系和这些表中数据的约束。DataSet 对象还可以包含 DataTable 对象,该对象又可以包含 DataColumnDataRow 对象。使用 DataTableMapping 对象和 DataColumnMapping 对象,数据集可以将数据库中的表和列映射为相应的 DataTable 对象和 DataColumn 对象。
  • SqlDataReader 对象和 OleDbReader 对象代表连接的、仅向前移动的、只读数据读取器。如果能够保持与数据库的持续连接,并且只希望读取数据而不进行更改,这是非常有用的。在这种情况下,无需创建 DataSet 对象。数据读取器类似于连接的、仅向前移动的、只读 ADO Recordset 对象。

作为参考,在使用 ADO 的 Office Visual Basic for Applications (VBA) 中,可以通过以下方法打开罗斯文示例 Access 数据库,将数据从 Products 表复制到 Recordset 对象,并报告记录集中第一条数据记录的某些数据:

' Office VBA 和 ADO 代码 - ADOCode.bas。
Public Sub ADOExample()

    ' 首先设置对 ADO 库的引用。
    Dim objConn As ADODB.Connection
    Dim objRS As ADODB.Recordset
    
    Set objConn = New ADODB.Connection
    
    objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "User ID=Admin;" & _
        "Data Source=C:\Program Files\Microsoft " & _
        "Office\Office10\Samples\Northwind.mdb"
    objConn.Open
    
    Set objRS = objConn.Execute("SELECT * FROM Products")
    
    objRS.MoveFirst
    
    MsgBox Prompt:=objRS.Fields("ProductName").Value & ", " & _
        objRS.Fields("UnitsInStock").Value
        
    objRS.Close
    objConn.Close

End Sub

如果您以前在 ADO 中进行过编码,则此 ADO 代码是非常简单的:

  • 声明 ADO 的 Connection 对象和 Recordset 对象,它们分别引用数据库的连接和数据库的基础数据。
  • Connection 对象的 ConnectionString 属性设置为数据库特定的 String 值,该值代表连接到数据库(本例中为罗斯文数据库)所需要的信息。
  • Connection 对象的 Open 方法建立了实际的数据库连接。
  • Connection 对象的 Execute 方法从数据库检索数据,并将检索到的数据放入 Recordset 对象。
  • Recordset 对象的 MoveFirst 方法移至记录集中的第一条记录。
  • Recordset 对象的 Fields 属性引用记录中的特定列,而 Field 对象的 Value 属性将检索字段中的实际数据。

作为比较,下面是一些用于控制台应用程序的 Visual Basic .NET 示例代码,使用 ADO.NET 执行大体相同的操作,但它并不将数据放入记录集,而是由一个 ADO.NET 数据读取器保持与数据的连接:

' Visual Basic .NET 和 ADO.NET 代码 - ADONETCode.vb。
' 使用连接的 ADO.NET 数据访问。
' 控制台应用程序。
Imports System.Data.OleDb

Module Module1

    Sub Main()

        ' 首先设置对 System.Data.dll 的引用。
        Dim objConn As New OleDbConnection _
            ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "User ID=Admin;" & _
            "Data Source=C:\Program Files\Microsoft" & _
            "Office\Office10\Samples\Northwind.mdb")

        objConn.Open()

        Dim objCmd As New OleDbCommand _
            ("SELECT * FROM Products", objConn)
        Dim objDataReader As OleDbDataReader = objCmd.ExecuteReader

        objDataReader.Read()
        Console.Write(objDataReader.Item("ProductName") & ", " & _
            objDataReader.Item("UnitsInStock"))

    End Sub

End Module

下面是该代码的工作方式:

  • 代码 Imports System.Data.OleDb 有助于减少访问对象或对象的成员时所需的工作量。例如,尽管可以在 ADO 中编写 ADODB.Recordset 代码,但通常并不这样做,因为已经引用了 ADODB 库。同样,尽管可以在 ADO.NET 中编写 System.Data.OleDb.OleDbConnection 代码,但如果已经导入了与 OleDbConnection 对象关联的名称空间 System.Data.OleDb(假设我们已预先设置了对 System.Data.dll 的引用),也就不需要进行编码。
  • 在 ADO 中,必须首先声明一个 Connection 类型的对象,然后使用 ConnectionString 属性定义连接信息。而在 .NET 中,我们使用参数化构造函数和初始值设定项的概念,只需一行代码便可以声明 OleDbConnection 类型的对象,并定义连接信息。
  • 与 ADO 类似,在 ADO.NET 中,使用 OleDbConnection 对象的 Open 方法建立实际的数据库连接。
  • 接下来,声明 ADO.NET 的 OleDbCommand 对象,以便存储从数据库检索数据的命令。
  • 然后声明 ADO.NET 的 OleDbDataReader 对象,从数据库读取数据。
  • 通过使用 OleDbCommand 对象的 ExecuteReader 方法,该代码允许数据读取器访问数据库中的特定数据。
  • OleDbDataReader 对象的 Read 方法将读取数据库中的第一条记录。
  • Console.Write 方法将数据从特定列(使用 OleDbReader 对象的 Item 属性)写入命令窗口。

下面是另一段 Visual Basic .NET 示例代码,执行与前面的 ADO.NET 示例相同的操作。但在这一示例中,数据将被复制到 ADO.NET 数据集,然后断开与数据库的连接:

' Visual Basic .NET 和 ADO.NET 代码 - ADONETCode.vb。
' 使用断开连接的 ADO.NET 数据访问。
' 控制台应用程序。
Imports System.Data.OleDb

Module Module1

    Sub Main()

        ' 首先设置对 System.Data.dll 的引用。
        Dim objConn As New OleDbConnection _
            ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "User ID=Admin;" & _
            "Data Source=C:\Program Files\Microsoft" & _
            "Office\Office10\Samples\Northwind.mdb")

        objConn.Open()

        Dim objAdapter As New OleDbDataAdapter _
            ("SELECT * FROM Products", objConn)
        Dim objDataSet As New DataSet()

        objAdapter.Fill(objDataSet)

        With objDataSet.Tables("Table").Rows(0)

            Console.Write(.Item("ProductName") & ", " _
                & .Item("UnitsInStock"))

        End With

    End Sub

End Module

下面是此代码与前一 ADO.NET 示例的区别:

  • OleDbDataReader 对象类似,OleDbAdapter 对象也是从数据库访问数据,但这里使用了 OleDbAdapter 对象的 Fill 方法,将数据表和它们之间的关系从数据库复制到 DataSet 对象。
  • DataSet 对象的 Tables 属性访问数据集的所有表,而 Rows 属性访问数据集中给定表的单个行。

可以在 Office VBA 中使用 ADO.NET 吗?

虽然您可能希望在 Office VBA 中使用 ADO.NET 的新功能,但目前还不能这样做。这是因为,如果运行 RegAsm.exe(.NET Frameworks SDK 中的程序集注册工具)将 System.Data.dll 注册为 COM(Office VBA 基于此技术),然后尝试从 Office 引用生成的类型库文件,则不会在 Office Visual Basic 的对象浏览器中显示任何成员。这是因为 COM 不能识别核心的私有 ADO.NET 成员和参数化的构造函数。因此,至少在目前,还只能继续在 Office VBA 中使用 ADO。

使用 Visual Studio .NET 数据访问工具

Visual Studio .NET 提供了许多便利工具用于访问 Office 数据,包括创建可重复使用的数据连接、数据库项目以及数据表单向导。

数据连接

数据连接允许您一次性定义数据库连接的详细信息,然后在多个解决方案中重复使用该信息。下面的示例介绍如何在 Visual Studio .NET 中创建可重复使用的数据连接:

  1. Tools(工具)菜单上,单击 Connect to Database(连接到数据库)。将显示 Data Link Properties(数据链接属性)对话框。
  2. Provider(提供程序)选项卡上,单击相应的数据提供程序,然后单击 Next(下一步)。例如,要连接到 Access 的罗斯文示例数据库,请单击 Microsoft Jet 4.0 OLE DB Provider(Microsoft Jet 4.0 OLE DB 提供程序)。
  3. 在所选数据提供程序的 Connection(连接)选项卡中填入信息。例如,对于罗斯文示例数据库,请单击 Select or enter a database name(选择或输入数据库名称)框旁边的 ... 按钮,浏览至 Northwind.mdb,然后单击 Open(打开)。
  4. 单击 Test Connection测试连接)。如果连接成功,单击 OK(确定)。否则,请重新检查 Connection(连接)选项卡上的信息。
  5. 单击 OK(确定),关闭 Data Link Properties(数据链接属性)对话框。

这样就有了一个可以添加到 Visual Studio .NET 项目的可重复使用的数据连接。

下面基于这些步骤给出一个示例,说明如何创建 ADO.NET 对象,这些对象能够与 Server Explorer服务器资源管理器)窗口中的现有数据连接进行交互操作:

  1. Windows 应用程序项目的 Designer(设计器)视图中,在 View(视图)菜单上,单击 Server Explorer(服务器资源管理器),展开所需的数据连接,然后将表、视图或存储过程拖动到设计界面上。Visual Studio .NET 将创建一个 OleDbConnection/SqlConnection 对象(取决于数据库的类型)、一个 OleDbDataAdapter/SqlDataAdapter 对象和四个 OleDbCommand/SqlCommand 对象,用于选择、插入、更新和删除数据。
  2. 右击 OleDbDataAdapter/SqlDataAdapter 对象,并单击 Generate Dataset(生成数据集)。在本例中,选择 New(新建),保留 DataSet1 的默认设置,选中要添加到数据集的表,选中 Add this dataset to the designer(将此数据集添加到设计器中),然后单击 OK(确定)。Visual Studio .NET 将创建一个 DataSet 对象。
  3. 右击 OleDbDataAdapter/SqlDataAdapter 对象,并单击 Preview Data(预览数据),单击 Fill Dataset(填充数据集),然后单击 Close(关闭)。
    注意:在 Visual Studio .NET Beta 2 中,不会显示 Fill Dataset(填充数据集)按钮,以便生成实际填充 Dataset 对象的代码。可能需要手动向 Form_LoadPage_Load 事件添加代码,如下所示:Me.OleDbDataAdapter1.Fill(DataSetName11)

下面的示例介绍如何在 Windows 窗体中添加数据网格,并绑定到前一示例中生成的现有数据集:

  1. Designer(设计器)视图中,单击工具栏上的 Windows Forms(Windows 窗体)选项卡,然后双击 DataGrid
  2. 在 DataGrid1 的 Properties(属性)窗口中,为 DataSource 属性选择 DataSet11,然后为 DataMember 属性选择表。
  3. 运行应用程序。
  4. 如果 DataGrid1 中未显示数据,请在 Form_Load 事件中添加类似如下的代码:Me.OleDbDataAdapter1.Fill(DataSetName11)
    提示:要在 Server Explorer(服务器资源管理器)窗口中没有现有数据连接的情况下创建 ADO.NET 对象,请执行以下步骤:
    1. 在设计视图中,单击工具栏上的 Data(数据)选项卡。请注意,这在 Code(代码)视图中无效。
    2. 将 ADO.NET 对象拖动到设计界面上。
    3. 右击 ADO.NET 对象,并单击 Properties(属性)。
    4. 填写所选 ADO.NET 对象的相应属性。

数据库项目

Visual Studio .NET 数据库项目允许您快速创建面向数据库的解决方案。下面的示例介绍如何在 Visual Studio .NET 中创建数据库项目:

  1. File(文件)菜单上,指向 New(新建),然后单击 Project(项目)。
  2. Project Types(项目类型)窗格中,展开 Other Projects(其他项目),然后单击 Database Projects(数据库项目)。
  3. Templates模板)窗格中,单击 Database Project(数据库项目)。
  4. 填写 Name(名称)和 Location(位置)框,然后单击 OK(确定)。
  5. 单击 Add to Solution(添加到解决方案)按钮将此项目添加到现有解决方案;或单击 Close Solution(关闭解决方案)按钮,创建独立的解决方案。
  6. Add Database Reference(添加数据库引用)对话框中,选择现有的数据连接,或单击 Add New Reference(添加新引用),以添加新的数据连接。如果单击 Add New Reference(添加新引用),请执行上一节中的步骤完成 Data Link Properties(数据链接属性)对话框。如果使用此方法添加新的数据连接,数据连接将显示在 Server Explorer(服务器资源管理器)窗口中。

数据表单向导

Visual Studio .NET 数据表单向导允许您快速连接到数据库,并生成简单的用户界面,用于显示数据并与数据进行交互。要使用数据表单向导,请执行以下步骤:

  1. 在 Windows 应用程序项目中,在 Project(项目)菜单上,单击 Add Windows Form(添加 Windows 窗体)。
  2. Templates(模板)窗格中,单击 Data Form Wizard(数据窗体向导),单击 Open(打开),然后单击 Next(下一步)。
  3. Create a new dataset named(创建新数据集)框中,键入 DataSet1,然后单击 Next(下一步)。
  4. 选择现有的数据连接或创建新数据连接,然后单击 Next(下一步)。
  5. 选择要向 DataSet1 填充的项,然后单击 Next(下一步)。
  6. 如果选择多项,请定义各项之间的关系,然后单击 Next(下一步)。
  7. 定义要在表单中显示的表和列,然后单击 Next(下一步)。
  8. 选择显示样式选项,然后单击 Finish(完成)。
    注意:请确保将新数据表单设置为启动表单,方法如下:在 Project(项目)菜单中,单击 Properties(属性)。展开 Common Properties(通用属性)文件夹,单击 General(常规),在 Startup object(启动对象)列表中选择该数据表单,然后单击 OK(确定)。
    注意:请确保将 DataSet1 中的数据绑定到数据表单,这可以通过向数据表单的 Load 事件插入以下代码来实现:Me.OleDbDataAdapter1.Fill(objDataSet1)
  9. 运行应用程序:在 Debug(调试)菜单上,单击 Run(运行)。

扩展的 ADO.NET 代码示例

为了向您演示更多的 ADO.NET 代码,在本月专栏的最后,我将介绍几个在 ADO.NET 中创建的扩展的代码示例。

使用 DataReader 对象以仅向前移动的、只读的格式访问数据

很多时候,您只是希望简单地浏览数据,而并不需要在数据间来回浏览,也不需要更改数据(我们将此称为“流水数据”)。ADO.NET 的 DataReader 对象是专门为此设计的。下面是我编写的一段示例代码,可以逐个读取连接的数据库中的所有选定数据:

' Visual Basic .NET 代码。
' 控制台应用程序。
' 引用:
'   System
'   System.Data
'   System.XML

Imports System.Data.OleDb                   ' 用于 OleDb 对象。
Imports Microsoft.VisualBasic.ControlChars  ' 用于 CrLf 常量。

Module Module1

    Sub Main()

        ' 创建并初始化 OleDbConnection、OleDbCommand
        ' 和 OleDbDataReader 对象。
        Dim objConn As New _
            OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "User ID=Admin;" & _
            "Data Source=C:\Program Files\Microsoft" & _
            "Office\Office10\Samples\Northwind.mdb")

        objConn.Open()

        ' 执行命令并将数据读取器附加到
        ' 所选数据。
        Dim objCmd As New OleDbCommand("SELECT * FROM Products", _
            objConn)
        Dim objReader As OleDbDataReader = objCmd.ExecuteReader

        ' 读取数据并列出值。 
        Call ReadData(objReader)

    End Sub

    Public Sub ReadData(ByVal objReader As OleDbDataReader)

        ' 目的:列出给定数据读取器的数据值。 
        ' 接受:objReader - 数据读取器。 

        Dim intField As Integer             ' 行中的当前字段。
        Dim intColumn As Integer            ' 当前列的名称。
        Dim blnColumns As Boolean = False   ' 列名称是否已
                                            ' 列出。

        With objReader

            ' 一次读取一行,直至文件末尾。
            Do While .Read = True

                For intField = 0 To .FieldCount - 1

                    ' 首先列出列名称。 
                    If blnColumns = False Then

                        For intColumn = 0 To .FieldCount - 1

                            If intColumn = .FieldCount - 1 Then
                                Console.Write(.GetName(intColumn) & _
                                    CrLf)
                            Else
                                Console.Write(.GetName(intColumn) & _
                                    ", ")
                            End If

                        Next intColumn

                        ' 只列出一次列名称。 
                        blnColumns = True

                    End If

                    ' 列出当前行中每个字段的值。
                    If intField = .FieldCount - 1 Then
                        Console.Write(.Item(intField) & CrLf)
                    Else
                        Console.Write(.Item(intField) & ", ")
                    End If

                Next intField

            Loop

        End With

        ' 暂停,以便用户在控制台窗口中查看数据。 
        Console.Write("按任意键继续...")
        Console.Read()

    End Sub

End Module

下面是该代码的工作方式:

  • 正如前面的代码示例所示,Imports 代码(例如,Imports System.Data.OleDb)有助于减少访问对象或对象的成员时所需的工作量。类似地,对 OleDbConnectionOleDbCommandOleDbDataReader 对象进行声明和初始化,以分别代表数据库连接、数据记录和记录游标。此代码的真正核心是 ReadData 子例程。
  • Do 循环使用 OleDbDataReader 对象的 Read 方法一次读取一行数据,直到该方法返回 False(表示已没有其他数据可读取)。
  • OleDbDataReader 对象的 FieldCount 属性返回数据行中数据字段(列)的数目。如果是第一行数据,则在列上调用 OleDbDataReader 对象的 GetName 属性,以返回列的名称。
  • OleDbDataReader 对象的 Item 属性与 FieldCount 属性结合,使用一个索引编号返回数据行中每个数据字段的值。

使用 DataAdapter、DataSet、DataTable、DataRow 和 DataColumn 对象处理数据集

ADO.NET 的 DataSet 对象是为断开连接的数据而设计的。您可以在一个数据集中模拟整个数据库的结构和数据,包括表、行、列、字段,甚至关系。处理完数据后,可以使数据集中的数据与原始数据库中的数据同步。下面是我编写的一段示例代码,可以逐个读取断开连接的数据集中的所有数据。

' Visual Basic .NET 代码。
' 控制台应用程序。
' 引用:
'   System
'   System.Data
'   System.XML

Imports System.Data.OleDb                   ' 用于 OleDb 对象。
Imports Microsoft.VisualBasic.ControlChars  ' 用于 CrLf 常量。

Module Module1

    Sub Main()

        ' 创建并初始化 OleDbDataAdapter 和 DataSet 对象。
        Dim objAdapter As New OleDbDataAdapter _
            ("SELECT * FROM Products", _
            "Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "User ID=Admin;" & _
            "Data Source=C:\Program Files\Microsoft" & _
            "Office\Office10\Samples\Northwind.mdb")
        Dim objDataSet As New DataSet()

        ' 将所选数据复制到数据集。
        objAdapter.Fill(objDataSet)

        ' 列出数据集中的数据值。
        Call ListData(objDataSet)

    End Sub

    Public Sub ListData(ByVal objDataSet As DataSet)

        ' 目的:列出给定数据集的数据值。 
        ' 接受:objDataSet - 数据集。

        Dim objTable As DataTable
        Dim intRow, intColumn As Integer

        ' 数据集中可能包含有多个表。 
        For Each objTable In objDataSet.Tables

            With objTable

                Console.Write("表" & _
                    .TableName "中的数据" & ":" & CrLf)

                ' 首先列出列名称。 
                For intColumn = 0 To .Columns.Count - 1

                    If intColumn = .Columns.Count - 1 Then
                        Console.Write(.Columns(intColumn).ColumnName _
                            & CrLf)
                    Else
                        Console.Write(.Columns(intColumn).ColumnName _
                            & ", ")
                    End If

                Next intColumn

                ' 按行列出数据...
                For intRow = 0 To .Rows.Count - 1

                    ' ...然后按字段列出每行中的数据。
                    For intColumn = 0 To _
                        .Rows(intRow).ItemArray.Length - 1

                        If intColumn = _
                                .Rows(intRow).ItemArray.Length - 1 Then
                            Console.Write(.Rows(intRow). _
                                ItemArray(intColumn) _
                                & CrLf)
                        Else
                            Console.Write(.Rows(intRow). _
                                ItemArray(intColumn) & ", ")
                        End If

                    Next intColumn

                Next intRow

            End With

        Next objTable

        ' 暂停,以便用户在控制台窗口中查看数据。 
        Console.Write("按任意键继续...")
        Console.Read()

    End Sub

End Module

下面是该代码的工作方式:

  • 同样,Imports 代码(例如,Imports System.Data.OleDb)有助于减少访问对象或对象的成员时所需的工作量。类似地,对 OleDbDataAdapter DataSet 对象进行声明和初始化,分别代表数据库与数据集之间的适配器以及数据集。OleDbAdapter 对象的 FillData 方法将数据库中的数据复制到数据集。此代码的核心是 ListData 子例程。
  • 通过使用 DataSet 对象的 Tables 属性,最外层的 For...Each 循环将遍历数据集中的每个表,并将每个表作为 DataTable 对象返回。
  • DataTable 对象的 Columns 属性返回一个 DataColumnCollection,代表表中的所有列。通过结合使用 Columns 属性和一个索引编号(即结合 DataColumnCollection 集合的 Count 属性,如代码中所示),将返回一个 DataColumn 对象。DataColumn 对象的 ColumnName 属性返回列的名称。
  • 同样,DataTable 对象的 Rows 属性返回一个 DataRowCollection,代表表中的所有行。通过结合使用 Rows 属性和一个索引编号(即结合 DataRowCollection 集合的 Count 属性,如代码中所示),将返回一个 DataRow 对象。DataRow 对象的 ItemArray 属性返回一个 Object 类型的数组,代表数据行中的每个值。通过结合使用 ItemArray 属性和一个索引编号(即结合 DataColumnCollection 集合的 Count 属性,如代码中所示),将返回单个数据字段值。

更多信息

有关 ADO.NET 的更多信息,请参阅以下内容:

与以往一样,请定期访问 Office 开发人员中心(英文),以查找有关 Office 解决方案开发的信息和技术文章。

原文转自:http://www.ltesting.net