主题：foxtable系统的撤销按钮对datacolchanged无效，是否正常？

你直接用我的代码就能达到撤消
If e.DataCol.Name = "记功等级" Then
    If e.DataRow.IsNull("记功等级") Then
        e.DataRow("奖励") = Nothing
    Else
        Dim s As String = e.DataRow("记功等级")
        If IsNumeric(s) Then
            Dim s2 As String = "★"
           e.DataRow("记功等级") = s2.PadLeft(s,"★")
            e.DataRow("奖励") =CInt(s) * 50
        End If
    End If
End If

晕，我以为是第一列的星....