我只想从完全限定的名称中选择一个路径。

例如,C:\Newfolder\iTDC.mdb显示在文本框中。

但是我只想取C:\Newfolder,删除iTDC.mdb

如何跳过文件?

最佳答案

快速又脏

Dim sPath As String

sPath = "C:\Newfolder\iTDC.mdb"

sPath = Left(sPath, InStrRev(sPath, "\"))

07-27 20:36