If e.DataCol.Name = "数字列" Then If e.NewValue <> Nothing Then e.newValue = e.NewValue & "万元"
End IfEnd If