主题：[求助]这个错误看不懂

Dim ct As Table = CurrentTable

If (Ct.Name = "任务追踪表" And ct.Rows >0) Then

    With Tables("关注表")

        .AddNew

        .Current("关注人") = user.Name

        .current("关注单号") = ct.Current("任务单号")

        .Current("关注时间") = Date1

    End With

End If

此主题相关图片如下：qq图片20140411134406.jpg

报错如下：