dataColChanged事件
If e.DataCol.Name <> "Log" Then
e.DataRow("Log") = User.Name & " " & Date.Now
End If