怎么删除指定字符前的3个字符

[sdht168]

请问各位高手,有一个特定字符串:
指定fgh+指定字
怎么把+左边的三个字符删除，变成

指定+指定字

谢谢

[东方之珠]

Dim S As String, Position As Long
S = "指定fgh+指定字"
Position = InStr(1, S, "+") '先确定"+"的位置
S = Left(S, Position - 4) & Right(S, Len(S) - Position + 1)
Debug.Print S

[sdht168]

chenjl1031老师的最棒了通用

[sdht168]

chenjl1031老师的语句最棒了,谢谢

[人生无悔]

Dim s As String
    s = "指定fgh指定字"
    s = Mid(s, 1, InStr(s, "fgh") - 1) + Mid(s, InStr(s, "fgh") + 3, Len(s))