Task.FreeSlack 属性 (Project)

获取某一任务的可用可宽延时间（以分钟为单位）。 只读 Variant 类型。

语法

expression。 FreeSlack

表达 一个代表 Task 对象的变量。

示例

以下示例将通过更改带有可用可宽延时间的任务的开始日期，消除活动项目中的可用可宽延时间。

Sub EliminateFreeSlack() 
 
 Dim T As Task ' Task object used in For Each loop 
 
 For Each T In ActiveProject.Tasks 
 If T.FreeSlack > 0 Then 
 T.Start = Application.DateAdd(T.Start, T.FreeSlack) 
 End If 
 Next T 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。