VB字符串截取，截取路径最后一个"\"后的字符？

Question

比如说“C:\Program Files\360\360Safe” 截取后只获得 360safe

Answer 1

可使用Split函数来实现截取路径最后一个"\"后的字符。

Split函数，返回一个下标从零开始的一维数组，它包含指定数目的子字符串。

具体代码如下：

Private Sub Form_Click()
    Dim ljStr As String
    ljStr = "C:\Program Files\Microsoft Visual Studio\VB98\ado"
    Debug.Print Split(ljStr, "\")(UBound(Split(ljStr, "\")))
End Sub

Answer 2

    Dim temp As String
    temp = "C:\Program Files\360\360Safe"
    Debug.Print Split(temp, "\")(UBound(Split(temp, "\")))

本回答被提问者采纳

Answer 3

a = "C:\Program Files\360\360Safe"
MsgBox Right(a, Len(a) - InStrRev(a, "\"))

Answer 4

比较笨的办法
Static d '取得 文件名称
d = “C:\Program Files\360\360Safe”

Answer 5

dim s as string
dim a
sim LastStr as string
s=“C:\Program Files\360\360Safe”

a=split(s,"\")
laststr=a(ubound(a))