以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  删除指字符后面的空格  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=179460)

--  作者:xietan417
--  发布时间:2022/8/25 11:57:00
--  删除指字符后面的空格
清真 14-A01-000007 800*    800M DSSDA

如上,我要删除*后面的空格变成这样
清真 14-A01-000007 800*800M DSSDA

--  作者:有点蓝
--  发布时间:2022/8/25 12:05:00
--  
Dim s As String = "清真 14-A01-000007 800*    800M DSSDA"
Dim ss() As String = s.split("*")
Dim s2 As String = ss(0) & "*" & ss(1).trim()
msgbox(s2)

--  作者:有点蓝
--  发布时间:2022/8/25 12:07:00
--  
Dim s As String = "清真 14-A01-000007 800*    800M DSSDA"
Dim i As Integer = s.IndexOf("*")
Dim s2 As String = s.Substring(0, i + 1) & s.Substring(i + 1).Trim
msgbox(s2)

--  作者:xietan417
--  发布时间:2022/8/25 12:35:00
--  
谢谢蓝版!