如何从“C:\abc\TEMP\A.TXT”中得知“A.TXT”在文件夹“TEMP”中？

[Surpass]

如何从“C:\abc\TEMP\A.TXT”中得知“A.TXT”在文件夹“TEMP”中？

[gaoqi1983]

'引用Microsoft Scripting Runtime
Dim obj As FileSystemObject

Private Sub Form_Load()
Set obj = New FileSystemObject
MsgBox obj.FileExists("C:\abc\TEMP\A.TXT")
'如果文件存在，返回真，否则返回假
End Sub

[Surpass]

TO gaoqi1983()
谢谢，我要的结果是“temp”。

[Surpass]

只是截取字符串嘛，怎样截取呀？有人回答吗？

[阿晨0]

如果只是截取字符串用instr()应该就可以了吧！

dim temp as interger

temp=instr("",""...)

如果temp>0，则要找的字符串就找到了。