Vb.net 如何在Visual Basic 2013中获取从OpenFileDialog打开的文件的文件夹路径

我正在使用OpenFileDialog打开一个文件。我的代码如下-

Public Sub ShowOpenDialog()
Dim f As New OpenFileDialog
f.InitialDirectory = GetFolderPath(SpecialFolder.MyDocuments)
f.Title = "Open File"
f.CheckFileExists = True
f.CheckPathExists = True
f.DefaultExt = "*.txt"
f.Filter = "Text (*.txt)|*.txt|All Files|*.*"
f.FilterIndex = 1
f.RestoreDirectory = True
If f.ShowDialog() = DialogResult.OK Then
'f.FileName displays file path, what I need is its folder path
'Performing action with f.FileName
End If
End Sub

我还需要文件的位置文件夹路径，但我找不到，如何获取它

---

p、 我还需要打开文件，所以我必须使用OpenFileDialog而不是FolderBrowserDialog。这就是为什么，我正在寻找一种从OpenFileDialog获取文件文件夹路径的方法。这将返回父文件夹名称。适用于不以结尾的文件和文件夹\

    ''Be sure to   Import Imports System.IO
Function GetDirPath(ByVal file As String) As String
    Dim fi As New FileInfo(file)
    Return fi.Directory.ToString
End Function

---

这将返回父文件夹名称。适用于不以结尾的文件和文件夹\

    ''Be sure to   Import Imports System.IO
Function GetDirPath(ByVal file As String) As String
    Dim fi As New FileInfo(file)
    Return fi.Directory.ToString
End Function