drawcell事件写代码
If e.Col.Name = "单价" AndAlso e.Text > "" Then
e.Text = e.Text & " 元"
End If
http://www.foxtable.com/webhelp/scr/2262.htm