If e.DataCol.Name = "第一列" If e.Newvalue = Nothing Then e.DataRow("第二列") = Nothing Else e.DataRow("第二列") = Format(cdate(e.newvalue), "yyyyMMdd") End IfEnd If