[已解决]请教如何从GUICtrlCreateInput中读取从右边数第一个“\”后边的字符

sdlw999 · 发表于 2010-1-11 14:39:54

本帖最后由 sdlw999 于 2010-1-11 20:43 编辑

如 D:\Documents\My Documents\My Music
就是读取： My Music

谢谢！

kn007 · 发表于 2010-1-11 15:56:14

MsgBox(0,"",_pathright("D:\Documents\My Documents\My Music"))



Func _pathright($Dir);用来提取最后一个“\”后面的字符串
        $set = ""
                While 1 
                        $str = StringRight($Dir, 1)
                        Select
                                Case $str = ""
                                        Return
                                Case $str = ""
                                        ExitLoop
                                Case Else
                                        $Dir = StringTrimRight($Dir, 1)
                                        $set = $str & $set
                        EndSelect
                WEnd
        Return $set
EndFunc   ;==>_pathright

顽固不化 · 发表于 2010-1-11 15:59:45

$FullPath="D:\Documents\My Documents\My Music"
$FileName=StringRegExp($FullPath,"\\(.[^\\]*)$",3)
MsgBox(0,0,$FileName[0])

sdlw999 · 发表于 2010-1-11 16:01:53

谢谢各位热心帮助！

afan · 发表于 2010-1-11 16:06:55

$FullPath = 'D:\Documents\My Documents\My Music'
MsgBox(0, 0, StringRegExpReplace($FullPath, '.+\\', ''))

kn007 · 发表于 2010-1-11 16:07:19

谢谢各位热心帮助！
sdlw999 发表于 2010-1-11 16:01

修改标题为已解决是对我们最好的感谢

gapkiller · 发表于 2010-1-11 17:50:25

是不是搞太复杂了
不是有个简单的么...

$str=StringSplit("D:\Documents\My Documents\My Music", "")
msgbox(0,0,$str[$str[0]])

sanmoking · 发表于 2010-1-11 18:01:05

楼上正解，楼上的楼上那些个高手们是在秀自己的武功呢，大家欣赏欣赏就好了。

rst52013353 · 发表于 2012-8-23 00:37:52

哈哈```````还是5楼的高手的好用啊`````

xiehuahere · 发表于 2012-8-23 10:43:03

本帖最后由 xiehuahere 于 2012-8-23 10:46 编辑

这个贡献加得够多~~
我也来讨点。

$FullPath = 'D:\Documents\My Documents\My Music'
MsgBox(0, "", StringTrimLeft($FullPath, StringInStr($FullPath, '\', 0, -1)))

		自动登录	找回密码
密码			加入

[已解决]请教如何从GUICtrlCreateInput中读取从右边数第一个“\”后边的字符

评分

评分

评分

评分