大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
你是要把连续多个空格,变换成只需要一个空格,那么:
为新民等地区用户提供了全套网页设计制作服务,及新民网站建设行业解决方案。主营业务为成都做网站、网站建设、新民网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!
do while Instr(tStr," ")0
tStr = Replace(tStr, " ", " ") '用一个空格,替换2个空格
loop
s="123456"
s1=left(s,2) " " mid(s,3,2) " " right(s,2)
s1的值就是"12 34 56"
textbox.text = "12345" " " "67890"
或者
textbox.text = "12345" space(1) "67890"
Dim s As String = "asdasdfasdf asdfasdf 12sdfsdf asdfa"
Dim arr() As String = Split(s, " ")
Dim 前部分 = String.Join(" ", arr, 0, 3)
Dim 后部分 = String.Join(" ", arr, 3, arr.Length - 3)
回答问题,保证品质 ^_^
一个字符一个字符的判断,空格就删除,非空格就保留
一个字符一个字符的判断,空格就删除,非空格就保留
一个字符一个字符的判断,空格就删除,非空格就保留
一个字符一个字符的判断,空格就删除,非空格就保留
一个字符一个字符的判断,空格就删除,非空格就保留
一个字符一个字符的判断,空格就删除,非空格就保留