尝试在子项目任务上使用 LINQ 时出现 MissingMemberException
MissingMemberException when trying to use LINQ on subproject Tasks
我正在 VB.NET 中开发 Microsoft Project 插件。每个项目都是 Project
类型,并且有自己的 Tasks
类型的任务列表,并且它们包含许多 Task
类型的任务。 Microsoft Project 有一个选项可以将其他项目文件作为子项目添加到其中。这些子项目的类型为 Subproject
,但它们有一个 属性 SourceProject
类型为 Project
。意思是,您应该能够通过 Project.Subprojects(0).SourceProject.Tasks
.
访问每个子项目 Tasks
,就好像它是常规 Project
类型一样
我尝试使用 LINQ 在 Project
上过滤掉一些任务。我发现 this 的回答非常有帮助,而且我成功地做到了,没有任何错误。在下面的代码中 ThisProject
是类型 Project
:
Dim tasksWithResources = ThisProject.Tasks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
但是,当我在遍历子项目时尝试做完全相同的事情时,我得到 MemberMissingException
:
For Each subproject In ThisProject.Subprojects
Dim subprojectTasksWithResources = subproject.SourceProject.Tasks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
Next
我尝试通过简单地将它们分配给一个变量来访问子项目任务,认为该子项目中没有 Tasks
。但它是成功的。因此,即使我这样写(我知道这与上面的代码块是一样的),我也会在我使用 Cast
:
的行上得到 MemberMissingException
For Each subproject In ThisProject.Subprojects
Dim tsks = subproject.SourceProject.Tasks
Dim subprojectTasksWithResources = tsks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
Next
这是我收到的错误消息:
Public member 'Cast' on type 'Tasks' not found.
编辑:
我知道一个简单的解决方法不是使用 LINQ,而是使用 For Each
遍历对象,但我很好奇为什么 LINQ 不起作用。
问题可能是子项目的任务尚未加载。
尝试通过访问任务强制加载项目。例如:
For Each s As MSProject.Subproject In ThisProject.Subprojects
Dim tempTsk As MSProject.Task = s.Tasks(1)
Dim subprojectTasksWithResources = s.SourceProject.Tasks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
Next
我在加载项中使用了以下代码来强制加载子项目。它运行良好,但我认为上面的代码可能就是您所需要的。
Friend Sub ShowAllTasks()
' expands all tasks to make sure all collapsed subprojects are loaded
With ProjApp
.SummaryTasksShow(True)
.FilterApply("All Tasks")
.SelectAll()
.OutlineShowAllTasks()
.SelectBeginning()
End With
End Sub
注意:这假定当前视图是任务视图。
P.S。为您的子项目使用不同的变量名称,因为 subproject
是对象的名称。
我正在 VB.NET 中开发 Microsoft Project 插件。每个项目都是 Project
类型,并且有自己的 Tasks
类型的任务列表,并且它们包含许多 Task
类型的任务。 Microsoft Project 有一个选项可以将其他项目文件作为子项目添加到其中。这些子项目的类型为 Subproject
,但它们有一个 属性 SourceProject
类型为 Project
。意思是,您应该能够通过 Project.Subprojects(0).SourceProject.Tasks
.
Tasks
,就好像它是常规 Project
类型一样
我尝试使用 LINQ 在 Project
上过滤掉一些任务。我发现 this 的回答非常有帮助,而且我成功地做到了,没有任何错误。在下面的代码中 ThisProject
是类型 Project
:
Dim tasksWithResources = ThisProject.Tasks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
但是,当我在遍历子项目时尝试做完全相同的事情时,我得到 MemberMissingException
:
For Each subproject In ThisProject.Subprojects
Dim subprojectTasksWithResources = subproject.SourceProject.Tasks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
Next
我尝试通过简单地将它们分配给一个变量来访问子项目任务,认为该子项目中没有 Tasks
。但它是成功的。因此,即使我这样写(我知道这与上面的代码块是一样的),我也会在我使用 Cast
:
MemberMissingException
For Each subproject In ThisProject.Subprojects
Dim tsks = subproject.SourceProject.Tasks
Dim subprojectTasksWithResources = tsks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
Next
这是我收到的错误消息:
Public member 'Cast' on type 'Tasks' not found.
编辑:
我知道一个简单的解决方法不是使用 LINQ,而是使用 For Each
遍历对象,但我很好奇为什么 LINQ 不起作用。
问题可能是子项目的任务尚未加载。
尝试通过访问任务强制加载项目。例如:
For Each s As MSProject.Subproject In ThisProject.Subprojects
Dim tempTsk As MSProject.Task = s.Tasks(1)
Dim subprojectTasksWithResources = s.SourceProject.Tasks.Cast(Of MSProject.Task).Where(Function(x) x.ResourceNames <> "")
Next
我在加载项中使用了以下代码来强制加载子项目。它运行良好,但我认为上面的代码可能就是您所需要的。
Friend Sub ShowAllTasks()
' expands all tasks to make sure all collapsed subprojects are loaded
With ProjApp
.SummaryTasksShow(True)
.FilterApply("All Tasks")
.SelectAll()
.OutlineShowAllTasks()
.SelectBeginning()
End With
End Sub
注意:这假定当前视图是任务视图。
P.S。为您的子项目使用不同的变量名称,因为 subproject
是对象的名称。