Excel VBA和C＃DLL：實例化WinForms對象只能執行一次。第二次嘗試有一個錯誤

Question

我已經建立了一個包含Winform的C＃dll。我想從Excel VBA打開表單。第一次嘗試總是成功的。它打開並做所有我想要它做的事情。然後我關閉使用右上角的紅色X

它，當我嘗試打開它第二次我總是得到錯誤信息：「在應用程序中創建第一個IWin32Window對象之前SetCompatibleTextRenderingDefault必須叫」 來源：System.Windows.Forms

WinForms類是由Visual Studio生成的標準類。我實例它在不同的類：

namespace Schnittstellenvererbung 
{ 
    [ComVisible(true), Guid("5D16EABF-B89F-45A1-8E4D-ACFAA084BF6F")] 
    [InterfaceType(ComInterfaceType.InterfaceIsDual)] 
    public interface ISchnittstellenvererbung 
    { 
     string ShowForm1(); 
    } 

    [ComVisible(true), Guid("6A9EF0BB-BFF3-456E-B025-CB6A25F81F59")] 
    [ProgId("Test.SchnittstellenvererbungExecuteProgram")] 
    [ClassInterface(ClassInterfaceType.None)] 
    public class ExecuteProgram : ISchnittstellenvererbung 
    { 
     public string ShowForm1() 
     { 
      try 
      { 
       Application.EnableVisualStyles(); 
       Application.SetCompatibleTextRenderingDefault(false); 
       Form1 Oberflaeche; 
       Oberflaeche = new Form1(); 
       Oberflaeche.ShowDialog(); 
      } 
      catch(Exception e) 
      { 
       MessageBox.Show(e.Message + e.Source); 
      } 

      return "Done"; 
     } 
    } 
} 

在Excel VBA調用非常簡單：

Sub test() 

    Dim y As String 
    Dim x As New Schnittstellenvererbung.ExecuteProgram 

    y = x.ShowForm1 

End Sub 

當我關閉Excel並重新打開它，它再次工作的第一次嘗試，但同樣的第二次嘗試失敗。

我想知道爲什麼會出現此錯誤，因爲SetCompatibleTextRenderingDefault方法始終在插入表單之前調用。

想法？

Answer 1

我在msdn中找到了一個解決方案。 Windows窗體運行在一個單獨的線程中。示例代碼是VB，但轉換爲C＃並不困難。如果有人需要幫助，可以使用teleriks代碼轉換器進行轉換。

鏈接：

MSDN解決方案：https://msdn.microsoft.com/en-us/library/ms229591%28v=vs.110%29.aspx

代碼轉換器：http://converter.telerik.com/