编写Datacolchanged代码
If e.DataCol.name = "A" Then e.DataRow("B") = Format(e.DataRow("A"), "yyyyMMdd")End If