VBProject 属性

       

该属性返回指定模板或文档的 VBProject 对象。

expression.VBProject

expression   必需。该表达式返回“应用于”列表中的一个对象。

说明

使用该属性可访问代码模块和用户窗体。

若要查看“对象浏览器”中的 VBProject 对象，必须在“Visual Basic 编辑器”的“引用”对话框中选中“Microsoft Visual Basic for Applications Extensibility”复选框（在“工具”菜单上单击“引用”可显示该对话框）。

示例

本示例显示 Normal 模板的 Visual Basic 工程的名称。

Set normProj = NormalTemplate.VBProject
MsgBox normProj.Name

本示例显示活动文档的 Visual Basic 工程的名称。

Set currProj = ActiveDocument.VBProject
MsgBox currProj.Name

本示例将一个标准代码模块添至活动文档，并将其重命名为“MyModule”。

Set newModule = ActiveDocument.VBProject.VBComponents _
    .Add(vbext_ct_StdModule)
NewModule.Name = "MyModule"