主题：[求助]获取目录怼开的窗口如何双击关闭?

Dim dlg As New FolderBrowserDialog
If dlg.ShowDialog = DialogResult.Ok Then
    MessageBox.Show("你选择的目录是：" & dlg.SelectedPath,"提示")
End If

利用这个语句打开的获取目录窗口,选中目录后,要按《确认》按钮后方可选中并关闭。如何实现双击选中的目录则自动选中并关闭？谢谢