主题：数据清空

用代码看看

systemready = False
For Each r As Row In CurrentTable.rows
    For Each c As Col In CurrentTable.cols
        r(c.name) = Nothing
    Next
Next
systemready = True

datacolchanged事件

If e.DataCol.name = "第三列" Then
    If e.NewValue <> nothing Then
        e.DataRow("第四列") = format(e.NewValue, "dddd")
    Else
        e.DataRow("第四列") = Nothing
    End If
End If

试试

systemready = False
For Each r As Row In CurrentTable.rows
    For Each c As Col In CurrentTable.cols
        If c.DataCol.Expression = Nothing Then
            r(c.name) = Nothing
        End If
    Next
Next
systemready = True

报什么错，要具体说明出来。

统计列，改成 接听分类 试试，不行，就要上传实例测试一下。设置没问题的。