ArgumentException - FolderBrowseDialog的参数无效？ （vb.net）

Question

我有一个更大的项目和一个我可以在其中找到的问题：

  Do Until Directory.Exists(xmlpath)
            Dim opendir As New FolderBrowserDialog
            opendir.RootFolder = Environment.SpecialFolder.Desktop
            opendir.SelectedPath = "C:\"
            If (opendir.ShowDialog() = DialogResult.OK) Then
                xmlpath = opendir.SelectedPath
            End If
            opendir.Dispose()
        Loop

很快，程序进入了行“If（opendir.ShowDialog（）= DialogResult.OK）然后”我收到此错误：

  

System.ArgumentException wurde nicht behandelt。的HResult = -2147024809   消息=Ungültiger参数。 Source = System.Drawing StackTrace：          bei System.Drawing.Image.get_Flags（）          bei System.Windows.Forms.ControlP aint.IsImageTransparent（Image backgroundImage）          bei System.Windows.Forms.Control.PaintBackground（PaintEventArgs e，Rectangle rectangle，Color backColor，Point scrollOffset）          bei System.Windows.Forms.Control.PaintBackground（PaintEventArgs e，Rectangle rectangle）          bei System.Windows.Forms.Control.OnPaintBackground（PaintEventArgs pevent）          bei System.Windows.Forms.ScrollableControl.OnPaintBackground（PaintEventArgs   E）          bei System.Windows.Forms.Control.PaintWithErrorHandling（PaintEventArgs e，   Int16层）          bei System.Windows.Forms.Control.WmPaint（Message＆amp; m）          bei System.Windows.Forms.Control.WndProc（Message＆amp; m）          bei System.Windows.Forms.ScrollableControl.WndProc（Message＆amp; m）          bei System.Windows.Forms.Control.ControlNativeWindow.OnMessage（Message＆amp; m）          bei System.Windows.Forms.Control.ControlNativeWindow.WndProc（Message＆amp; m）          bei System.Windows.Forms.NativeWindow.DebuggableCallback（IntPtr hWnd，Int32 msg，IntPtr wparam，IntPtr lparam）InnerException：

请原谅我有几个部分是德语但我真的不知道为什么会出现这个错误。

它给出了框架使用控件的绘图类，但为什么它应该在它之前工作的错误上运行？

编辑： 2015年8月15日

好吧，我有理由更新它 - 显示对话框 - 几乎只是将它移动到另一个要调用的位置。

问题是，我仍然得到ArgumentException，但是现在我改变了一个组框控件的高度。

这似乎是一个相当随机的例外？

Answer 1

使用Environment.GetFolderPath(Environment.SpecialFolder.Desktop)代替Environment.SpecialFolder.Desktop