VB字符串截取,截取路径最后一个"\"后的字符?
答案:5 悬赏:40 手机版
解决时间 2021-11-20 19:57
- 提问者网友:眉目添风霜
- 2021-11-20 16:04
VB字符串截取,截取路径最后一个"\"后的字符?
最佳答案
- 五星知识达人网友:怙棘
- 2021-11-20 16:31
可使用Split函数来实现截取路径最后一个""后的字符。
Split函数,返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
具体代码如下:
Private Sub Form_Click()
Dim ljStr As String
ljStr = "C:Program FilesMicrosoft Visual StudioVB98ado"
Debug.Print Split(ljStr, "")(UBound(Split(ljStr, "")))
End Sub
Split函数,返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
具体代码如下:
Private Sub Form_Click()
Dim ljStr As String
ljStr = "C:Program FilesMicrosoft Visual StudioVB98ado"
Debug.Print Split(ljStr, "")(UBound(Split(ljStr, "")))
End Sub
全部回答
- 1楼网友:低音帝王
- 2021-11-20 19:17
比较笨的办法
Static d '取得 文件名称
d = “C:\Program Files\360\360Safe”
Static d '取得 文件名称
d = “C:\Program Files\360\360Safe”
- 2楼网友:孤老序
- 2021-11-20 18:12
dim s as string
dim a
sim LastStr as string
s=“C:\Program Files\360\360Safe”
a=split(s,"\")
laststr=a(ubound(a))
dim a
sim LastStr as string
s=“C:\Program Files\360\360Safe”
a=split(s,"\")
laststr=a(ubound(a))
- 3楼网友:鱼忧
- 2021-11-20 17:48
a = "C:\Program Files\360\360Safe"
MsgBox Right(a, Len(a) - InStrRev(a, "\"))
MsgBox Right(a, Len(a) - InStrRev(a, "\"))
- 4楼网友:千夜
- 2021-11-20 17:39
Dim temp As String
temp = "C:Program Files360360Safe"
Debug.Print Split(temp, "")(UBound(Split(temp, "")))
temp = "C:Program Files360360Safe"
Debug.Print Split(temp, "")(UBound(Split(temp, "")))
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯