組合框Click事件挑戰

對不起我的原始的問題，可能是你能不能幫我:)組合框Click事件挑戰

我有我的窗體上的組合框。如果我點擊它，我看到這樣的信息：

enter image description here

下On Click組合框的情況下，我沒有看到代碼，填補這個組合框。唯一使用的事件是On Got Focus和After Update。

在了焦點：

Private Sub ctl42_GotFocus() 
    Call subPfadFilter(ctl42, "Obd2") 
End Sub

和更新後事件運行宏

此組合框爲界來源：

enter image description here

我的目標是用vba代碼模擬這個動作。如果我點擊表單上的按鈕，那麼我想看看第一個圖中的內容。我怎樣才能做到這一點？

2014-09-19 Kaja

有沒有這樣的事情作爲一個原始的問題:)我們都必須從零開始！

你的問題是有點難以理解，以你真正想做的事情，所以幾點意見：

我假設你的組合ctl42實際返回的結果 - 即組合的清單部分有行嗎？
您需要的事件是「點擊」，而不是「關注焦點」。從代碼中刪除「Private Sub ctl42_GotFocus（）」。在組合的屬性中，選擇事件選項卡，然後在組合的「單擊」字段中選擇[事件過程]，然後單擊右側的省略號（...），Access將會在代碼隱藏表單模塊中爲您創建一個空子集。這就是你需要把你的函數調用的地方 - 調用subPfadFilter（ctl42，「Obd2」）。
您的函數subPfadFilter可能會過濾您的子窗體。如果這不起作用，您可能需要在此處發佈代碼。

HTH

2014-09-19 11:08:27 maxhugen

我想，我不能正確地解釋我的問題：/我已經寫在'代碼在click'event。但如果我點擊按鈕，我不能看到組合框下的列表框 – Kaja 2014-09-19 11:22:55

查看圖像，看起來在單擊組合框時，您會看到要從中選擇的值列表。我無法放大圖像，所以我不太確定，但如果這是正確的。即使沒有VBA，複製也應該很簡單。

您可以點擊控制源末尾的小方框（...），它會爲您打開一個查詢窗口。選擇您希望該框在點擊時顯示的所有列。並確保轉到格式頁面並將列數設置爲您選擇的實際列數假設爲4，然後設置每列的寬度並將列標題設置爲是

格式屬性列計數= 4 Column Widths = 0.5; 0.5; 0.5; 0.5 Column heads =是

2014-09-19 10:59:26 izzymo

回答