Access VBA教程:AllStoredProcedures集合

多个对象
AllStoredProcedures
AccessObject

AllStoredProcedures集合包含CurrentDataCodeData对象中每个存储过程的AccessObject对象。

使用 AllStoredProcedures集合

CurrentData 或 CodeData对象具有一个 AllStoredProcedures集合,其中包含描述由 CurrentData 或 CodeData 指定的所有存储过程的实例的 AccessObject对象。例如,可以在 Visual Basic 中列举 AllStoredProcedures集合来设置或返回该集合中单个 AccessObject对象的属性值。

提示   For Each...Next 语句对列举集合非常有用。

可以引用 AllStoredProcedures集合中的单个 AccessObject对象,方法是:按照名称引用对象,或引用集合中对象的索引。如果要引用 AllStoredProcedures集合中特定的对象,最好按照名称引用存储过程,因为存储过程的集合索引可能会更改。

AllStoredProcedures集合的索引是从零开始的。如果通过索引来引用存储过程,则第一个存储过程是 AllStoredProcedures(0),第二个存储过程是 AllStoredProcedures(1),依此类推。

注意

下面的示例将打印 AllProcedures集合中每个打开的 AccessObject对象的名称。


Sub AllStoredProcedures()
    Dim obj As AccessObject, dbs As Object
    Set dbs = Application.CurrentData
    ' Search for open AccessObject objects in
    ' AllStoredProcedures collection.
    For Each obj In dbs.AllStoredProcedures
        If obj.IsLoaded = True Then
            ' Print name of obj.
            Debug.Print obj.Name
        End If
    Next obj
End Sub

上页:Access VBA教程:AllReports集合 下页:Access VBA教程:AllTables集合

Access VBA教程:AllStoredProcedures集合

Access VBA教程:AllTables集合 Access VBA教程:AllViews集合
Access VBA教程:Controls集合 Access VBA教程:DataAccessPages集合
Access VBA教程:FormatConditions集合 Access VBA教程:Forms集合
Access VBA教程:Modules集合 Access VBA教程:Pages集合
Access VBA教程:Properties集合 Access VBA教程:References集合
Access VBA教程:Reports集合 Access VBA教程:Microsoft Access 的“自动化”功能
Access VBA教程:颜色生成器 Access VBA教程:转换类库数据库和加载项
Access VBA教程:转换 Microsoft Access 表、窗体和报表 Access VBA教程:自定义方法和属性
Access VBA教程:窗体 Access VBA教程:窗体的节
Access VBA教程:隐藏属性 Access VBA教程:索引
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号