以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]怎样去掉由Chr(13) & Chr(10)生成的换行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=179502)

--  作者:wldhj
--  发布时间:2022/8/26 17:39:00
--  [求助]怎样去掉由Chr(13) & Chr(10)生成的换行
怎样从字符串里将由Chr(13) & Chr(10)生成的换行去掉
--  作者:sxxjwjj
--  发布时间:2022/8/26 17:57:00
--  
Dim str As String
str = "hello"
str = str.Insert(3, chr(13) & Chr(10)) \'字符串里 加入chr(13) 和 chr(10)

Output.Show(str.Length)
Output.Show(str) \'展示
str = str.Replace(chr(10), "") \'替换chr(10)
str = str.Replace(chr(13), "") \'替换chr(13)
Output.Show(str.Length)
Output.Show(str) \'再次展示,发现没有了 

--  作者:sxxjwjj
--  发布时间:2022/8/26 17:58:00
--  
图片点击可在新窗口打开查看
上面代码 运行结果