我想知道 vb 如何获取字符串中某个字符之后的所有字符

Question

如题所述

Answer 1

使用InStr 函数，返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。

InStr 函数示例

本示例使用 InStr 函数来查找某字符串在另一个字符串中首次出现的位置。

Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP"   ' 被搜索的字符串。
SearchChar = "P"   ' 要查找字符串 "P"。

' 从第四个字符开始，以文本比较的方式找起。返回值为 6（小写 p）。
' 小写 p 和大写 P 在文本比较下是一样的。
MyPos = Instr(4, SearchString, SearchChar, 1)  

' 从第一个字符开使，以二进制比较的方式找起。返回值为 9（大写 P）。
' 小写 p 和大写 P 在二进制比较下是不一样的。
MyPos = Instr(1, SearchString, SearchChar, 0)

' 缺省的比对方式为二进制比较（最后一个参数可省略）。
MyPos = Instr(SearchString, SearchChar)   ' 返回 9。
MyPos = Instr(1, SearchString, "W")   ' 返回 0。


使用Mid 函数，

返回 Variant
(String)，其中包含字符串中指定数量的字符。

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"。

结合两个函数使用，先获取某个字符在字符串位置，再用Mid函数获取该字符之后的所有字符，见上行例句。

来自：求助得到的回答

Answer 2

s = "dfefe343krgkrgk:fdfgrgrg" '假定要获得冒号后的所有字符
s = Split(s, ":")(1)
或者
s = Mid(s, Instr(s, ":") + 1)本回答被网友采纳