VB .net 클래스 라이브러리

Question

클래스 라이브러리 응용 프로그램 유형에 대해 의문이 생기므로 이에 대한 도움이 필요합니다.

플러그인을 추가 할 수있는 소프트웨어가 있습니다. Visual Studio 2010을 사용하여 VB.NET에서이 플러그인을 만들고 싶습니다. 이 소프트웨어는 클래스 라이브러리 응용 프로그램 유형 만 허용하며 사용자가 목록에서 값을 가져 오려면 ComboBox가있는 Form을 표시해야합니다.

소프트웨어가 플러그인을 호출 할 때 처음 실행되는 기본 클래스에 있습니다. 개체 이름 아래에있는 코드에서 Windows Form을 실행하면 objListValidation입니다. 내 문제는 내가 Me.Show()를 할 때 창을 표시하지만 CompareToList 함수의 끝으로 가서 멈추지 않는다는 것입니다. 윈 폼을 표시

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 

Answer 1

당신은 아마 사용자까지 반환하지 않습니다 Me.ShowDialog()를 호출 할

대화 상자를 닫습니다 .