主题：[求助]写以下代码，将单位格在的全角数字替换为半角？

如题，有一列列名为“文件摘要”，要输入时需要用到中文输入，但输入的数字也变成了全角，怎样写一段代码让这列的单元格编辑后，用半角的数字替换为全角的数字。

全角数字有：０１２３４５６７８９

半角数字为：0123456789

谢谢大家了。

原因：

http://www.foxtable.com/help/topics/1273.htm

 

 晚上告诉你，应该挺简单的……

For Each dr As DataRow In CurrentTable.DataTable.DataRows
    dr("文件摘要") = StrToNarrow(dr("文件摘要"))
Next

也可以直接在DataColChanged事件中设置代码。

If e.DataCol.name = "文件摘要"
    e.DataRow("文件摘要") = StrToNarrow(e.DataRow("文件摘要"))
End If

C版的应该行。

 嗯嗯，C版的行……才知道有StrToNarrow这个东西。

 害得我还傻傻地去写一个这样的函数。

 叔回去啃帮助……

谢谢Cry版主，即简单又非常的实有。

再次谢过了。