交互式甘特图VARCHART XGantt：如何计算活动结束日期（ActiveX版）

VARCHART XGantt是一个交互式的甘特图控件，其模块化的设计让您可以创建满足您和您的客户所需求的应用程序。可以快速、简单地集成到您的应用程序中，帮助您识别性能瓶颈、避免延迟以及高效利用资源，使复杂数据变得更加容易理解。

本篇文章主要解释了VARCHART XGantt如何计算活动结束时间，感兴趣的朋友可以自己动手操作一下哦~

结束日期的表列仍为空。可以在VARCHART XGantt中包含的日历的帮助下，从“开始”和“持续时间”字段计算活动的结束。

在默认日历中，工作日（星期一到星期五）被定义为活动时间，而周末（星期六和星期日）被定义为非活动时间。

在图中，您可以通过灰色背景识别非活动时间。可以通过在“节点”属性页上停用“将日历分配给节点”选项来关闭日历。

请注意有无日历计算的差异：

活动从星期五开始并持续3天，如果日历被激活，活动将在星期二结束。没有日历，活动将在周日结束。

结束日期通过对象VcCalendar的AddDuration（...）方法计算。因此，需要每项活动的开始和持续时间。可以通过索引从相应的数据字段中检索它们。在通过DataField（...）方法设置结束日期之后，必须调用VcNode的UpdateNode方法，以便可以看到数据的更改。

示例代码

Dim tmpCal As VcCalendar
Dim tmpDate As Date
Set tmpCal = VcGantt1.Calendar