***VBScript有没有从字串指定位置起提取子串的函数?难道只有left,right吗?

[billdavid]

如有没有类似下面的substr
str = "abcdefg"
str1 = substr(str, 1, 2) '##str1 is "ab" now

[butcher2002]

可以这样

4-最后

a="wetsdfgdsaf"
b=right(4,len(a))

取左面的~不要最后4个
a="wetsdfgdsaf"
b=left(0,len(a)-4)

[阿泰]

Mid 函数
请参阅
Left 函数 | Len 函数 | LTrim、RTrim 和 Trim 函数 | Right 函数
要求
版本 1
从字符串中返回指定数目的字符。

Mid(string, start[, length])
参数
string
字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。
Start
string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。
Length
要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。
说明
要判断 string 中字符的数目，可使用 Len 函数。

下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：

Dim MyVar
MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "Script"。
注意 MidB 函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。

[tddw]

有，mid函数。
mid(str,3,4)
代表从str字符串中的第3位向后提取4个字符

[butcher2002]

写错了
取第5个起后面的~~~~~
a="wetsdfgdsaf"
b=right(a,len(a)-4)

取左面的~不要最后4个
a="wetsdfgdsaf"
b=left(a,len(a)-4)

[butcher2002]

刚跟js的函数记混了。。。

[wujoe_00]

min()

[realsong]

mid

[zhangjun]

mid

[satans18]

mid

[fogheart]

str = "abcdefg"
str1 = substr(str, 1, 2) '##str1 is "ab" now
可对应于
str = "abcdefg"
str1 = mid(str,1,2) '##str1 is "ab" now

[billdavid]

cool, thanks all of you, although I have solve it by using left and right.