即使选择选项,VBA显示列表框也始终为null



我创建了一个列表框,并将其从GUI中添加到我的用户表格中。列表框是单个选择,是一列。通过行源添加了3个选项;值是"," Jimmy"," Jack",我有以下VBA,以确保选择选项

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

现在我遇到的问题是,即使选择一个值,MSGBox仍会显示通知用户选择一个值,因此无法通过!要检查列表框是否为null的正确语法是什么?

编辑
如果用户在仍然选择列表框时单击"用户"表单上的按钮(焦点(,则此语法将有效,但是如果列表框没有焦点,则语法似乎无法保留该值...

我没注意到您的价值列表上的第一个条目是"。

一个" fix"(hack(将是添加一个空间"。

只有选择第一个条目时,问题必须发生。它需要在那里吗?

最新更新