在DrawCell事件中设置代码,如:
If e.Col.IsDate If e.Row.IsNull((e.Col.Name)) = False e.text = Format(e.Row(e.Col.Name),"y") End IfEnd If