我创建了一个列表框,并从GUI将其添加到我的用户表单中。列表框是单选,是一列。通过Row Source添加了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仍会显示通知用户选择一个值,因此无法通过!检查列表框是否为空的正确语法是什么?
修改
如果用户在列表框仍处于选中状态时单击用户表单上的按钮(具有焦点),则此语法将起作用,但如果列表框没有焦点,则语法似乎无法保留该值...
答案 0 :(得分:0)
我第一次没有注意到你的价值表上的第一个条目是“”。
一个“修复”(hack)将添加一个空格“”。
只有在选择第一个条目时才会出现问题。它需要在那里吗?