Office中国论坛/Access中国论坛

标题: 还有什么方法，可以一次性的去掉所有的不同的标点符号啊？ [打印本页]

作者: accsee使用中 时间: 2010-7-18 21:20
标题: 还有什么方法，可以一次性的去掉所有的不同的标点符号啊？
在accsee或者excel中，某一个字段（列）中，含有很多不同的标点符号，
除了使用逐个替换的方法外，
还有什么方法，可以一次性的去掉所有的不同的标点符号啊？
请高手帮忙！在此先感谢了！

作者: t小宝 时间: 2010-7-18 22:57
使用 Replace 这个函数

作者: t小宝 时间: 2010-7-19 00:15
'清除某个字段中的某个字符,可一次指定多个字符
'假如要清除表1的字段1中所有的","号"."号和"?"号：ReplaceCharacter "表1", "字段1", ",.?"
'
Public Function ClearCharacter(TableName As String, FieldName As String, strFind As String) As Boolean

Dim stTmp As String
Dim i As Integer

For i = 1 To Len(strFind)
      stTmp = Mid(strFind, i, 1)
      CurrentDb.Execute "Update [" & TableName & "] Set [" & FieldName & "]=Replace([" & FieldName & _
         "],'" & stTmp & "','') Where [" & FieldName & "] Like '*" & stTmp & "*'"
Next

ClearCharacter = True

End Function

作者: accsee使用中 时间: 2010-7-19 09:01
t小宝您好！您说的Replace 这个函数，我找到了，但是不会填写，能否把有步骤的填写结合实例发附件吗？多谢！我把例子发给您。

作者: t小宝 时间: 2010-7-20 15:17
3楼不是写好了吗？

作者: 简 时间: 2010-7-20 23:15
我也遇着类似的问题，我们同事输数据时，因为输入法的缘故，老是喜欢把半角的小数点“.”输成全角的“．”，于是引起数据库的死机或者结果错误，挺烦的。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)