Ort des Ordners "Eigene Dateien" ermitteln und anzeigen

1
2
3

'per messagebox den speichertort für "eigene dateien" anzeigen
        Dim OrtEigeneDateien As String = Environment.GetFolderPath(Environment.SpecialFolder.Personal)
        MessageBox.Show(OrtEigeneDateien)