ProjectType 属性

使用 ProjectType 属性可以确定当前通过 CurrentProject 或 CodeProject 对象打开的项目的类型。AcProjectType，只读。

AcProjectType 可以是下列 AcProjectType 常量之一：

acADP

acMDB

acNull

expression.ProjectType

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

说明

UseLongFileNames 属性仅在使用 Visual Basic 时才可用。

示例

下面的示例将显示一条消息，详细说明当前打开的项目的类型。

Dim intProjType As Integer
 
intProjType = Application.CurrentProject.ProjectType
 
Select Case intProjType
    Case 0 ' acNull
        MsgBox "ProjectType is acNull"
    Case 1 ' acADP
        MsgBox "ProjectType is acADP"
    Case 2 ' acMDB
        MsgBox "ProjectType is acMDB"
    Case Else
	MsgBox "Can't determine ProjectType" 
End Select