L'initialiseur de type pour '[Modulename]' a généré une exception

J'ai cette nouvelle vb.net projet (MedicalCost) d'avoir ce message d'erreur "L'initialiseur de type pour 'MedicalCost.Les constantes' a déclenché une exception." lors de l'exécution de la sous.. j'ai déjà fait ça avant, sur mon précédent projet et tout fonctionne bien quand je suis en déclarant ang public varible sur mon module, mais maintenant dans mon projet actuel, sa ne fonctionne pas.

voici mon code sur mon module(Constantes):

 Imports System.Data.Sql
    Imports System.Data.SqlClient
    Imports System.Data.Odbc
    Imports System.Windows.Forms

    Public Module Constants
        Public ppiconn As New SqlConnection("Dsn=pandiman2002connectdsn;server=ppi;uid=sa;database=Pandimandata2002")
        'Dsn=pandiman2002connectdsn;description=PPI Database;uid=sa;app=Microsoft® Visual Studio® 2010;wsid=CRWUSER17-PC;database=Pandimandata2002
        Public da As New SqlDataAdapter
        Public comm As New SqlCommand
        Public dr As SqlDataReader
        Public ds As New DataSet

        Public x As String


    End Module

quand im exécution des sous sur mon frm_add

voici mon code

Sub search_crew()

    Try
        x = "(isnull(ltrim(rtrim(firstname)),'') + ' ' + isnull(ltrim(rtrim(mi)),'') + ' ' + " _
               & "isnull(ltrim(rtrim(lastname)),'') like '%" & Replace(searchbox.Text, " ", "%") & "%' " _
               & " or isnull(ltrim(rtrim(lastname)),'') + ' ' + isnull(ltrim(rtrim(mi)),'') + ' ' + " _
               & "isnull(ltrim(rtrim(firstname)),'') like '%" & Replace(searchbox.Text, " ", "%") & "%' " _
               & "or legal_records.caseno like '%" & UCase(searchbox.Text) & "%')"

        ppiconn.Close()
        ppiconn.Open()
        Pandimandata2002DataSet.EnforceConstraints = False
        da = New SqlDataAdapter(select_tblcrw & "where " & x, ppiconn)
        da.Fill(Pandimandata2002DataSet.tblCrew)
        da.Dispose()
        ppiconn.Close()
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try

End Sub

J'ai remarqué que toute variable déclarée dans le module est la raison pour laquelle cette erreur "L'initialiseur de type pour 'MedicalCost.Les constantes' a déclenché une exception." se produit.

quelqu'un peut m'aider. J'ai déjà passé 1 heure à la recherche pour cette erreur et rien ne m'aide.
tnx!

OriginalL'auteur Juan Filipe | 2014-03-07