Thread en cours doit être réglé à thread unique appartement dans VB.NET

C'est le new méthode dans mon formulaire:

Public Sub New(ByVal ConnectionString As String, ByVal ConSql As SqlClient.SqlConnection, ByVal Daman As Array, ByVal SDate As Integer, ByVal FDate As Integer)

    Threading.Thread.CurrentThread.TrySetApartmentState(Threading.ApartmentState.STA)
    ' This call is required by the Windows Form Designer.
    'Error Appear in this line
    InitializeComponent()

    ' Add any initialization after the InitializeComponent() call.
    Me.Sto_TypeFormFrameTableAdapter.Connection.ConnectionString = ConnectionString
    Me.Sto_typeformTableAdapter.Connection.ConnectionString = ConnectionString
    con = ConSql
    com.Connection = con
    ConNew = ConnectionString
    DamaneCod = Daman
    Start = SDate
    Final = FDate
    Fill()
End Sub

Lorsque je crée un nouvel objet de mon formulaire, le InitializeComponent commande obtient une erreur.

Le message d'erreur est:

Thread en cours doit être réglé à thread unique appartement (STA) mode
avant OLE appels peuvent être effectués. S'assurer que votre Principale fonction est de s'
STAThreadAttribute marqués sur elle.

Ce formulaire est dans un projet dont la sortie est un fichier DLL pour un autre projet, et l'erreur n'apparaît pas dans un autre projet qui a utilisé ce fichier DLL.
Comment puis-je résoudre ce problème?

Ne pas faire ce genre de choses dans la Nouvelle procédure.

OriginalL'auteur Saeed-rz | 2013-01-01