dim str1="abcdefg"
dim str2="de"
我想 从str1中去掉 de后面的所有 字符
得到 abcde
如何做
用 vbscript
------解决方案--------------------
- VBScript code
Dim str1 : str1="abcdefg" Dim str2 : str2="de" Dim p, s p = InStr(str1, str2) If IsNull(p) Or p = 0 Then s = str1 Else s = Left(str1, p + Len(str2)-1) End If WScript.Echo s