Access VBA教程:CopyObject方法

在 Visual Basic 中,CopyObject方法执行CopyObject 操作。

expression.CopyObject(DestinationDatabase, NewName, SourceObjectType, SourceObjectName)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

DestinationDatabase  可选 Variant 型。字符串表达式,代表对象复制到的目标数据库的有效路径和文件名。若要选择当前数据库,请将该参数留空。注意:在Microsoft Access 项目 (.adp) 中,必须将 destinationdatabase参数留空。如果在类库数据库中执行包含 CopyObject方法的 Visual Basic 代码,并将该参数留空,Microsoft Access 会将对象复制到类库数据库中。

NewName  可选 Variant 型。字符串表达式,代表复制对象的新名称。若要使用相同的名称,请将该参数留空。

SourceObjectType  可选AcObjectType。

AcObjectType 可以是下列 AcObjectType 常量之一:
acDataAccessPage
acDefault 默认
acDiagram
acForm
acFunction
acMacro
acModule
acQuery
acReport
acServerView
acStoredProcedure
acTable

注意   当在数据访问页中使用 CopyObject方法时, “默认”数据库文件夹中将创建数据访问页的 HTML 文件副本,目标数据库中将创建指向副本的链接。

SourceObjectName  可选 Variant 型。字符串表达式,代表 sourceobjecttype参数所选类型的对象的有效名称。如果在类库数据库中运行包含 CopyObject方法的 Visual Basic 代码,Microsoft Access 会先在类库数据库中查找具有相同名称的对象,然后再在当前数据库中查找。

说明

有关该操作及其参数如何使用的详细信息,请参阅该操作的主题。

对于该方法,必须包含 destinationdatabase 或 newname参数之一,或两者都包括。

如果将 sourceobjecttype 和 sourceobjectname参数留空(对于 sourceobjecttype参数将假设为默认常量 acDefault),Microsoft Access 将复制“数据库”窗口中的选定对象。若要选择“数据库”窗口中的对象,可以使用 SelectObject 操作或 SelectObject方法,并将 In Database Window参数设置为“是”(True)。

如果指定 sourceobjecttype 和 sourceobjectname参数,但是将 newname 或 destinationdatabase参数之一留空,则必须包含 newname 或 destinationdatabase参数的逗号。如果将末尾的参数留空,那么在指定的最后一个参数后面不要使用逗号。

VBA示例

下面的示例使用 CopyObject方法将“雇员”表复制到当前数据库,并为其指定一个新的名称:


DoCmd.CopyObject, "Employees Copy", acTable, "Employees"

上页:Access VBA教程:Close方法 下页:Access VBA教程:DeleteObject方法

Access VBA教程:CopyObject方法

Access VBA教程:DeleteObject方法 Access VBA教程:DoMenuItem方法
Access VBA教程:FindNext方法 Access VBA教程:FindRecord方法
Access VBA教程:GoToControl方法 Access VBA教程:GoToRecord方法
Access VBA教程:Hourglass方法 Access VBA教程:Maximize方法
Access VBA教程:Minimize方法 Access VBA教程:MoveSize方法
Access VBA教程:OpenDataAccessPage方法 Access VBA教程:OpenDiagram方法
Access VBA教程:OpenForm方法 Access VBA教程:OpenModule方法
Access VBA教程:OpenQuery方法 Access VBA教程:OpenReport方法
Access VBA教程:OpenStoredProcedure方法 Access VBA教程:OpenTable方法
Access VBA教程:OpenView方法 Access VBA教程:OutputTo方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号