If e.col.Name = "日期" Then
e.Text = iif(e.Row.IsNull("日期"), nothing, format(e.Row("日期"), "MM-dd"))
End If