编写Datacolchanged事件
If e.DataCol.Name = "状态" Then e.DataRow("log") = User.Name & " " & Date.Now & e.DataRow("状态")End If