vb一个字符串在另一个字符串中第二次出现的位置?

vb中,求一个字符串在另一个字符串中第二次出现的位置,用什么函数?不是求最后一次出现位置,也不是第一次出现位置。
Instr and InstrRev函数都似乎无法满足要求。
自己写个判断当然可以,我不记得了不知道有没有其它的字符串处理函数。

Private Sub Command1_Click()
a = "SET DC VSOURCE/49V/12A"
b = InStr(1, a, "V") '第一个出现/的位置。
c = InStr(b + 1, a, "V") '第二个出现/的位置。
End Sub
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-06-08
Dim nPos As Long, strSource As String, strFind As String

strSource = "ABCDABCE"
strFind = "AB"

nPos = InStr(1, strSource, strFind)
If nPos > 0 Then
nPos = InStr(nPos + Len(strFind), strSource, strFind)
End If
Print "第二次出现位置是:" & nPos本回答被提问者和网友采纳
第2个回答  2010-06-08
添加两个文本框text1和text2,一个命令按钮
text1在text2中出现的位置如下
Private Sub Command1_Click()
Dim a As Integer
a = InStr(InStr(1, Text2.Text, Text1.Text) + 1, Text2.Text, Text1.Text)
If a > 0 Then
MsgBox Text1.Text & "第二次出现的位置为" & a
End If
End Sub
第3个回答  2010-06-08
自己写个判断不就完了。
假设要在string1里边找string2的值
dim i as integer
i = Instr(string1,string2)
if i > 0 then
i = Instr(i + Len(string2), string 1, string2)
end if
第4个回答  2010-06-08
instr找出第一个,再以结果为start再次使用instr
相似回答