FolderBrowserDialog 在取消时再次打开

Question

当我打开 FolderBrowserDialog 然后单击取消时，它会再次重新打开。 但是，在第二个 FolderBrowserDialog 上，当您再次单击取消时，它会正确关闭。 当您在第二个 FolderBrowserDialog 上选择路径时，它不执行或不返回任何内容 当我单击第一个取消时，我可以停止出现第二个 FolderBrowserDialog 吗？ 我不知道它为什么会出现。提前致谢。

这是我的代码：

Dim apppath
Try
    FolderBrowserDialog1.RootFolder = Environment.SpecialFolder.Desktop
    FolderBrowserDialog1.SelectedPath = "C:\"
    FolderBrowserDialog1.Description = "Select File Location Path"
    If FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
        apppath = FolderBrowserDialog1.SelectedPath
    ElseIf FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.Cancel    Then
        Exit Sub
    End If
    My.Computer.FileSystem.WriteAllText(apppath & "apppath.txt", apppath, False)
    MessageBox.Show(apppath)
Catch ex As Exception
    MessageBox.Show("Invalid Location")
    Exit Sub

结束尝试

Answer 1

试试这样的

Dim result as Windows.Forms.DialogResult = FolderBrowserDialog1.ShowDialog()
If result = Windows.Forms.DialogResult.OK Then
    apppath = FolderBrowserDialog1.SelectedPath
ElseIf result = Windows.Forms.DialogResult.Cancel    Then
    Exit Sub
End If