我想创建一个dir(以变量Utilities._Name
命名),位于exe文件的两个级别,
我的exe文件位于C:\SGEA\SGEA\bin
我怎么能这样做,所以我得到C:\SGEA\theNewDir
而不使用完整路径,只是相对路径?
If Not System.IO.Directory.Exists(Utilities._Name) Then
System.IO.Directory.CreateDirectory(Utilities._Name)
Else
MessageBox.Show("There is already a dir named: " & Utilities._Name, "SGEA", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
答案 0 :(得分:1)
如果您有exe文件的路径,则可以使用System.IO.Path Class轻松导航:
Dim folder = Path.GetDirectoryName(theExeFile)
Dim grandparent = Path.GetDirectoryName(Path.GetDirectoryName(folder)) ' Up two directories
Dim newFolder = Path.Combine(grandparent, "theNewDir") ' Use this to create the new folder name cleanly
Utilities._Name = newFolder