Winforms VB.net类库

我对类库应用程序类型有疑问，所以我需要这方面的帮助

我有一个可以添加插件的软件。我想使用Visual Studio 2010在VB.NET中创建此插件。 软件只接受类库应用程序类型，我需要显示一个带有组合框的表单，以便用户在列表中拾取值

在软件调用插件时首次启动的主类中。我在下面的代码中启动了一个Windows窗体，该对象的名称为objListValidation。我的问题是，当我执行Me.Show（）时，它会显示窗口，但它会到达CompareToList函数的末尾，并且不会停在那里

启动Win表单的代码：

Public objListValidation As ListValidation

objListValidation = New ListValidation
objListValidation.CompareToList("SELECT <NOM_CHAMP> FROM <NOM_TABLE>")

Public Sub CompareToList(ByVal qryStr As String, Optional ByVal isBloquant As Boolean = False)
    Dim alCompteGeneraux As New ArrayList
    Dim isExistsInList As Boolean = False

    Dim objConnectDB2 As New ConnectDB2
    Dim i As Integer = 0

    If Not isBloquant Then btnCancel.Visible = True : manageButtonsPosition() Else mstrIsBloquant = True
    al.Add("AAA")
    al.Add("VVVV")
    al.Add("BBBB")

    For i = 0 To al.Count - 1
        If al.Item(i).ToString = mstrObjInvoiceField.DisplayString Then isExistsInList = True
    Next

    If Not isExistsInList Then
        Me.Text = "Liste de choix pour le champ : " + mstrObjInvoiceField.Name
        lblTitle.Text = "Veuillez choisir dans la liste une valeur pour le champ : " + mstrObjInvoiceField.Name
        cbList.DataSource = al
        Me.Show()
    Else
        validation()
    End If

End Sub

---

您可能需要调用

Me.ShowDialog（）

，直到用户关闭对话框后才会返回