2012-09-17 94 views
1

我有一個只有文本列的表格。此外,我有一個組合框的形式。現在我想讓組合框重點關注。所以我在vba中添加一個方法:我必須在Access2007中的Combobox上點擊兩次

Private Sub combobox1_GotFocus() 
    With combobox1 
     .RowSource = "SELECT text " + _ 
      "FROM tblExample " + _ 
      " ORDER BY text" 

     .Requery 
    End With 

End Sub 

當我現在單擊combobox1時,下拉列表不會打開。只有當我第二次點擊它時,它纔會打開。這裏有什麼問題?如果我將兩條評論放在評論中,我可以一次點擊組合框,並顯示一個空白列表。

注意:我簡化了這個問題。我有另外一個公式,我也是這樣做的,它工作正常。我希望有人有一個想法如何解決這個問題。

+0

如果您可以提供與您實際使用的查詢類似的查詢,將會有所幫助。您需要更改有關查詢的內容?一個where子句? – dmarra

+0

是的,它帶有INNER JOIN和where子句的查詢,如「SELECT tblAnotherExample.text FROM tblExample INNER JOIN tblAnotherExample ON tblExample.ID = tblAnotherExample.ExampleID WHERE tblAnotherExample.column1 =」+ CStr(Me.AnotherCombobox.Value)+「 ORDER BY tblAnotherExample.text「 – Hauke

回答

0

當您重新查找組合框時,它暫時失去焦點。當你再次點擊它時,它已經有了焦點,所以OnFocus事件不會觸發。您可能需要在用戶點擊組合框之前重新查詢組合框。

相關問題