String 如何删除字符串中某个字符后的空格？

我只是想知道是否有办法替换字符串中某个字符后的所有空格。基本上是一根弦

str = "This is a test - 1, 2, 3, 4, 5"

我想基本上删除'-'后面的所有空格。我知道该怎么做

replace(str," ","") 

但这将删除所有空间，我想保持“这是一个测试”的完整性，以便于用户阅读

Instr(str,"-") 

---

获取该字符的位置，但不知道如何从该点开始对字符串的其余部分执行替换函数。

我会使用正则表达式，但如果您只想使用字符串函数，我想这就是您要问的问题

str = "This is a test - 1, 2, 3, 4, 5"
chrPos = Instr(str,"-")
lStr = Left(str, chrPos + 1)
rStr = Replace(str , " " , "", chrPos+1)
wscript.echo lStr & rStr

---

结果是这是一个测试-1,2,3,4,5

我会使用正则表达式，但如果你只想使用字符串函数，我想这就是你要问的

str = "This is a test - 1, 2, 3, 4, 5"
chrPos = Instr(str,"-")
lStr = Left(str, chrPos + 1)
rStr = Replace(str , " " , "", chrPos+1)
wscript.echo lStr & rStr

结果是，这是一个测试-1,2,3,4,5

VBScript函数有一个开始参数，但它的工作方式与您预期的不同。因此，您必须隔离要在其上执行替换的部分：

Dim parts
parts = Split("This is a test - 1, 2, 3, 4, 5", "-", 2) ' returns array with 2 items (max)
Debug.Print parts(0) & "-" & Replace(parts(1), " ", "") ' replace and concatenate

VBScript函数有一个开始参数，但它不能按预期的方式工作。因此，必须隔离要在其上执行替换的部分：

Dim parts
parts = Split("This is a test - 1, 2, 3, 4, 5", "-", 2) ' returns array with 2 items (max)
Debug.Print parts(0) & "-" & Replace(parts(1), " ", "") ' replace and concatenate

---

“VBScript”。.uhg。我[为你]感到痛苦。

replace

是否需要一个开始索引？否则两个子字符串（首先获取“to preserve”和“to replace”字符串）重建就行了..只需使用spitballing，但如果字符串第一部分的结尾总是唯一的，即字符串中唯一的“-”，则可以在“-”上拆分字符串，然后从拆分中删除第二个数组中的所有空格。“VBScript”。.uhg.我为你感到痛苦.是否

replace

获取开始索引？否则将获取两个子字符串（首先获取“to preserve”和“to replace”字符串）重建就行了。只需使用spitballing，但如果字符串第一部分的结尾始终是唯一的，即字符串中唯一的“-”，则可以在“-”上拆分字符串，然后从拆分中删除第二个数组中的所有空格。您应该检查

Replace

函数参数-start.@Paul它不起作用t从那一点开始替换。它从一开始就将部分切掉，然后对剩余部分执行替换（参见其他答案，其中也使用了两个子字符串）。我的道歉-你是对的。如果你编辑你的帖子，我将替换我投的反对票。你应该检查

replace

函数参数-start。@Paul它不会从那一点开始替换。它会从一开始就切掉部分，然后在剩余部分上执行替换（参见其他答案，它也使用两个子字符串）.我的道歉-你是对的。如果你编辑你的帖子，我将替换我投的反对票。