清除字符串中的回车换行符

页面导航:首页 > 软件编程 > vb.net > 清除字符串中的回车换行符

清除字符串中的回车换行符

来源: 作者: 时间:2016-01-15 15:10 【

如题,实际应用中,客户输入的地址中含有回车换行,导致格式转换中出错,因此需要清除掉,方法有二:1、替换,这个方法只能清除一个回车换行 39;检测地址中是否有回车换行 addr
如题,实际应用中,客户输入的地址中含有回车换行,导致格式转换中出错,因此需要清除掉,方法有二:
 
1、替换,这个方法只能清除一个回车换行
 
 
'检测地址中是否有回车换行  
addr = Cells(row1, 12)  
If InStr(1, addr, Chr(10), vbBinaryCompare) > 0 Then  
    MsgBox addr  
    addr = Replace(addr, Chr(10), "", , , vbBinaryCompare)  
    addr = Replace(addr, Chr(13), "", , , vbBinaryCompare)  
    MsgBox addr  
    Cells(row1, 12) = addr  
End If  

 

 
 
2、用函数,这个方法可以清除所有非打印字符
 
'检测地址中是否有回车换行  
addr = Cells(row1, 12)  
If InStr(1, addr, Chr(10), vbBinaryCompare) > 0 Then  
    MsgBox addr  
    addr = Application.WorksheetFunction.Clean(addr)  
    MsgBox addr  
    Cells(row1, 12) = addr  
End If  

 

 
Tags:

文章评论

最 近 更 新
热 点 排 行
Js与CSS工具
代码转换工具

<