datacolchanging事件,写代码
If e.DataCol.name = "第四列" Then If e.newvalue <> Nothing Then e.newvalue = e.newvalue.replace(chr(-23640), "(").replace(chr(-23639), ")") End IfEnd If