ProjectItem.IsOpen[String] 属性
定义
重要
一些信息与预发行产品相关，相应产品在发行之前可能会进行重大修改。 对于此处提供的信息，Microsoft 不作任何明示或暗示的担保。
获取一个指示项目项是否在特定视图类型中打开的值。
public:
property bool IsOpen[System::String ^] { bool get(System::String ^ ViewKind); };[System.Runtime.InteropServices.DispId(204)]
public bool IsOpen[string ViewKind = "{FFFFFFFF-FFFF-FFFF-FFFF-FFFFFFFFFFFF}"] { [System.Runtime.InteropServices.DispId(204)] get; }[<System.Runtime.InteropServices.DispId(204)>]
[<get: System.Runtime.InteropServices.DispId(204)>]
member this.IsOpen(string) : boolPublic ReadOnly Property IsOpen(Optional ViewKind As String = "{FFFFFFFF-FFFF-FFFF-FFFF-FFFFFFFFFFFF}") As Boolean参数
属性值
一个布尔值，指示是否 true 在给定视图类型中打开项目; 否则为 false 。
- 属性
示例
Sub IsOpenExample()
Dim proj As Project
Dim projitems As ProjectItems
Dim msg As String
' Reference the current solution and its projects and project items.
proj = DTE.ActiveSolutionProjects(0)
projitems = proj.ProjectItems
' List properties of the project and its items.
msg = "Is the item open? " & projitems.Item(1).IsOpen & Chr(13)
msg = msg & "The project's unique name: " & proj.UniqueName
' The following two properties work only if the current project
' contains subprojects. If it does, then uncomment the lines to run
' them.
' msg = msg & "The parent project item name: " & proj.ParentProjectItem.Name & Chr(13)
' msg = msg & "The subproject name: " & projitems.Item(1).SubProject.Name & Chr(13)
MsgBox(msg)
End Sub