Freigeben über


Containersammlung (DAO)

Gilt für: Access 2013, Office 2013

Eine Containers-Auflistung enthält alle Container-Objekte , die in einer Datenbank definiert sind.

Hinweise

Jedes Database-Objekt verfügt über eine Containers-Auflistung , die aus integrierten Containerobjekten besteht. Einige dieser Container-Objekte werden durch das Microsoft Access-Datenbankmodul und einige möglicherweise durch andere Anwendungen definiert.

Beispiel

Das folgende Beispiel führt die Containers-Auflistung der Nordwind-Datenbank und die Properties-Auflistung jedes Container-Objekts der Auflistung auf.

    Sub ContainerObjectX()
    
       Dim dbsNorthwind As Database
       Dim ctrLoop As Container
       Dim prpLoop As Property
    
       Set dbsNorthwind = OpenDatabase("Northwind.mdb")
    
       With dbsNorthwind
    
          ' Enumerate Containers collection.
          For Each ctrLoop In .Containers
             Debug.Print "Properties of " & ctrLoop.Name _
                & " container"
    
             ' Enumerate Properties collection of each
             ' Container object.
             For Each prpLoop In ctrLoop.Properties
                Debug.Print "  " & prpLoop.Name _
                   & " = " prpLoop
             Next prpLoop
    
          Next ctrLoop
    
          .Close
       End With
    
    End Sub