vb截取字符串

Mid 函数示例
本示例使用 Mid 语句来得到某个字符串中的几个字符。

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo"   建立一个字符串。
FirstWord = Mid(MyString, 1, 3)   ' 返回 "Mid"。
LastWord = Mid(MyString, 14, 4)   ' 返回 "Demo"。
MidWords = Mid(MyString, 5)   ' 返回 "Funcion Demo"。

Left 函数示例
本示例使用 Left 函数来得到某字符串最左边的几个字符。

Dim AnyString, MyStr
AnyString = "Hello World"   ' 定义字符串。
MyStr = Left(AnyString, 1)   ' 返回 "H"。
MyStr = Left(AnyString, 7)   ' 返回 "Hello W"。
MyStr = Left(AnyString, 20)   ' 返回 "Hello World"。

Right 函数示例
本示例使用 Right 函数来返回某字符串右边算起的几个字符。

Dim AnyString, MyStr
AnyString = "Hello World"   ' 定义字符串。
MyStr = Right(AnyString, 1)   ' 返回 "d"。
MyStr = Right(AnyString, 6)   ' 返回 " World"。
MyStr = Right(AnyString, 20)   ' 返回 "Hello World"。