lark.com

火鸟乐园——生活在.net时代

:: :: :: ::

替换空格合回车符号的函数

摘要： function DoWhiteSpace(str) DoWhiteSpace = Replace((Replace(str, vbCrlf, "")), chr(32)&chr(32), " ") End Function 阅读全文

posted @ 2005-06-13 20:27 火鸟阅读(757) 评论(0) 推荐(0)