VB去掉第2个\以后的内容

比如,c:\test\123\34\werw\222不管是多深的目录,我只要前面的c:\test,也可以是c:\test\在线等我只有11分了。... 比如,c:\test\123\34\werw\222
不管是多深的目录,我只要前面的c:\test,也可以是c:\test\
在线等
我只有11分了。
展开
 我来答
lxz1969
2009-02-26 · TA获得超过1.1万个赞
知道大有可为答主
回答量:8524
采纳率:33%
帮助的人:1.1亿
展开全部
dim i as integer,n as integer,r as string,s as string
r="c:\test\123\34\werw\222"
for i=1 to len(r)
if mid(r,i,1)="\" then n=n+1
if n=2 then exit for
next i
s=left(r,i)'返回c:\test\,如果需要返回c:\test,则需要把i改为i-1
print s
百度网友c8b8bd133
2009-02-26 · TA获得超过305个赞
知道小有建树答主
回答量:165
采纳率:0%
帮助的人:219万
展开全部
Dim s As String
s = "c:\test\123\34\werw\222 "
Print Left(s, InStr(4, s, "\"))

'说明,instr(4,s,"\") 是从S字符串的第四个字符开始查找"\")
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
junkeelee456
2009-02-26
知道答主
回答量:30
采纳率:0%
帮助的人:24.2万
展开全部
都不知你是想把这串字符串去掉`还是什么的`
路过...随便弄个
left("c:\test\123\34\werw\222",7)
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
老人与孩v动手洞脑
2009-02-27 · TA获得超过599个赞
知道小有建树答主
回答量:400
采纳率:0%
帮助的人:328万
展开全部
Dim s As String, ss As String, p As Integer
s = "c:\test\123\34\werw\222"
p = InStr(p + 1, s, "\")
ss = Left(s, InStr(p + 1, s, "\") - 1)
Print ss
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式