救急！！！一个字符串格式为"...\..."我现在要取出"\"后面的字符串应该怎么办？

Question

Private Sub Command1_Click()
    Dim strTest As String
    
    strTest = "d:\test.txt"
    
    MsgBox Right(strTest, Len(strTest) - InStr(1, strTest, "\"))End Sub

Answer 1

 
    Dim strTest As String
    
    strTest = "c:\test.txt"
    
    MsgBox Mid(strTest, InStr(1, strTest, "\") + 1)
 

Answer 2

用instr,也可以用Split
a=instr(1,字符串,"\")
得到\的位置
b=left(字符串，len(字符串)+a+1)
得到你字符串a=split(字符串,"\")
得到按“\”断开的数组

Answer 3

dim a as integer
dim str as string
str=....\......
a=instr(0,str,"\")+1
qqq=mid(str,a,len(str)-a)
前提是STR有‘\'，需要加上判断条件才完整
这是一个本办法 

Answer 4

'Dim intCount As Integer
'For intCount = Len(Pathname) To 1 Step -1
'    If Mid(Pathname, intCount, 1) = "\" Then
'       Exit For
'    End If
'Next intCount
'StripPath = Mid(Pathname, intCount + 1, Len(Pathname) - intCount)

Answer 5

用right，和instr函数
假设字符串为str，
right(str,len(str)-instr(1,str,"\"))

Answer 6

上面写错的 是：）
mid(str,instr(str,"\")+1)