用replace把字符串中的空格、回车、换行符 替换为""，如：str = Replace(Replace(Replace(str,Chr(34),""),Chr(13),""),chr(10),"")，chr(34)，chr(13)，chr(10)为对应的ASCII码。