Question Inputbox pour trouver un chemin

Function DragDropSample() {
    [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms") | out-null
    $form = New-Object Windows.Forms.Form
    $form.text = "Lien"
    $listBox = New-Object Windows.Forms.ListBox
    $listBox.Dock = [System.Windows.Forms.DockStyle]::Fill
    $handler = {
        if ($_.Data.GetDataPresent([Windows.Forms.DataFormats]::FileDrop)) {
            foreach ($filename in $_.Data.GetData([Windows.Forms.DataFormats]::FileDrop)) {
                $listBox.Items.Add($filename)
                }
            }
        }
    $form.AllowDrop = $true
    $form.Add_DragEnter($handler)
    $form.Controls.Add($listBox)


    $result = $form.ShowDialog()
    $listBox.Items
    }

$chemin = DragDropSample 
$chemin

Function DragDropSample() {
    [void][System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
    [void][System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")

    $Form = New-Object System.Windows.Forms.Form
    [System.Windows.Forms.Application]::EnableVisualStyles()

    $Form.ClientSize = ‘400,100’
    $Form.Text = "Lien"


    $Bouton = New-Object System.Windows.Forms.Button
    $Bouton.Location = New-Object System.Drawing.Point(30,50)
    $Bouton.Width = 80
    $Bouton.Height = 40
    $Bouton.Text = "Quitter"
    $Bouton.Add_Click(
        {
        $form.Close();
        })
    $form.Controls.Add($Bouton)

    $TextBox = New-Object System.Windows.Forms.TextBox
    $TextBox.Location = New-Object System.Drawing.Point(30,110)
    $TextBox.Width = 200

    $TextBox.Dock = [System.Windows.Forms.DockStyle]::Fill
    $handler = {
        if ($_.Data.GetDataPresent([Windows.Forms.DataFormats]::FileDrop)) {
            foreach ($filename in $_.Data.GetData([Windows.Forms.DataFormats]::FileDrop)) {
                $TextBox.text = $filename
                }
            }
        }
    $TextBox.AllowDrop = $true
    $TextBox.Add_DragEnter($handler)

    $Form.controls.Add($TextBox)

    $result = $Form.ShowDialog()

    $TextBox.text

    }

$chemin = DragDropSample 
$chemin