主题：甘特图问题

这样行吗？DataColChanged写

Select Case e.DataCol.Name

    Case "开始日期","结束日期"

        Dim dr As DataRow = e.DataRow

        If dr.IsNull("开始日期") OrElse dr.IsNull("结束日期")  Then

            Functions.Execute("BuildGanttTable")

        Else

            Return

        End If

End Select

选择目录树时还跳出

.NET Framework 版本：2.0.50727.5485

Foxtable 版本：2014.11.11.1

错误所在事件：全局表事件,AfterSelRangeChange

详细错误信息：

未将对象引用设置到对象的实例。

没想通这和全局表AfterSelRangeChange有什么关系，整个和甘特图相关的窗体及表中都无牵涉全局表AfterSelRangeChange的代码

这是全局表的AFTERSELRANGE事件的代码

全部注释后正常了

'Dim Sum As Double

'Dim AVG As Double

'With e.Table

 '   Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)

  '  AVG = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)

'End With

'StatusBar.Message3="合计:" & Sum & ""

但我又需要这段代码？请解释下原因