即使選擇了選項，VBA顯示列表框始終爲空

我創建了一個列表框，並將它從GUI中添加到我的用戶表單中。列表框是單選，是一列。通過行來源添加了3個選項;值是「」，「吉米」，「傑克」和我有以下VBA來確保一個選項被選中即使選擇了選項，VBA顯示列表框始終爲空

If IsNull(Me!List10) Then 
    MsgBox "Please Select A Value!", vbOKOnly 
    Me.List10.SetFocus 
    Exit Sub 
Else 
    selectedoption = Me!List10 
End If

現在，即使當值選擇MSGBOX仍顯示通知我有問題用戶選擇一個值，所以沒有辦法通過！什麼是正確的語法來檢查列表框是否爲空？

編輯
如果用戶點擊用戶窗體上的按鈕，同時還選擇列表框中這句法將工作（具有焦點），但似乎語法不能保留，如果列表框中的值沒有焦點...

來源

2017-05-29 IcyPopTarts

列表框的綁定列屬性的值是什麼？它必須是1否則該列表框將始終返回null。 – mdialogo

@mdialogo - 它被設置爲1.如果按下按鈕時列表框具有焦點，並且列表框沒有焦點，則列表框將返回適當的值，如果列表框沒有焦點，則返回null。 – IcyPopTarts

還有其他事情正在發生。只要你點擊按鈕，列表框失去焦點，所以我不認爲焦點是問題。編輯，見下文。 – wazz

我沒有注意到你的值列表上的第一個條目是第一次是「」。

一個「修復」（黑客）將增加一個空間「」。

只有在選擇第一個條目時，該問題纔會發生。它需要在那裏嗎？

來源

2017-05-30 00:37:08 wazz

即使選擇了選項，VBA顯示列表框始終爲空

回答

相關問題