自動完成在組合框窗體

Question

我有組合框中的自動完成功能，它工作正常，但沒有什麼問題，我提出的建議列表出現文字長度超過3個字符，但列表出現後的長度4個字符（當用戶輸入文本的第五個字符），這意味着當在第一時間列表不會出現在這裏執行的代碼是Text_Changed事件代碼

Private Sub TxtItem_TextChanged(sender As System.Object, e As System.EventArgs) Handles TxtItem.TextChanged 


    If Trim(TxtItem.Text) <> "" And Trim(TxtItem.Text).Length > 3 Then 
     'Autocomplete 
     Dim Bl As New ItemBL 
     Dim suggestions = Bl.DisplayLikeNameList(Trim(TxtItem.Text)) 
     Dim MySource As New AutoCompleteStringCollection() 
     MySource.AddRange(suggestions.ToArray) 

     With TxtItem 
      .AutoCompleteMode = AutoCompleteMode.Suggest 
      .AutoCompleteSource = AutoCompleteSource.CustomSource 
      .AutoCompleteCustomSource = MySource 
     End With 
     TxtItem.Select(TxtItem.Text.Length, 0) 
     Exit Sub 
    Else 
     TxtItem.AutoCompleteMode = AutoCompleteMode.None 
    End If 

End Sub 

注意：此問題會導致應用程序退出（有時）在Windows XP上，但不影響Windows 7

Answer 1

在此文章中找到答案：Dynamically changing Textbox's AutoComplete List causes AccessViolationException, any advice?

所以我不得不作出的建議全局列表和初始化在窗體load事件AutoComplete屬性和它的工作好。