果壳：
等同于Me.ListBox1.Selected(2) = True的是什么，但突出显示而不是选择？ （突出显示可能是错误的词，但我确定在此上下文之前我已经看到过 - 选项周围的大纲框而不是实际选择它）
**试过**
Me.ListBox1.ListIndex = 2
也没做任何事情。
With Me.ListBox1
saveVal = .List(0)
.Value = ""
.Value = saveVal
End With
给我一个错误说＆＃34;无效的属性值＆＃34;
背景
为什么我需要在某些项目/框上单击两次？
我有一个包含多个ListBox的用户表单，这些用户表单是通过逐个添加项目来填充的，这样可以正常工作。
ListBox设置已更改为MultiSelect = 1 - fmMultiSelectMulti和ListStyle = 1 - fmListStyleOption
问题是当第一次尝试在某些盒子上选择一个选项时，它只是在不选择它的情况下突出显示它，而在其他盒子和其他尝试上它可能会或可能不会立即选择一个选项。它似乎不是同一个罪魁祸首，并且有点随机 - 它与我点击选项的位置有关吗？在项目文本而不是项目框？为什么它适用于某些而不适用于其他人？
在我在一个框中选择了一个选项后，它允许我选择任意其他选项，只需点击一下即可获得所需的行为。
我发现有人建议这种行为的链接是因为工作簿损坏了，但我不认为这样。我刚刚在用户表单中创建了一个包含1个列表框的新书，更改为所需设置，将列表框复制了6次，将列表源作为rand（）放在A列中：G和我仍然遇到同样的问题。
编辑：我的计划是＆＃34;突出显示＆＃34;每个框上的顶部选项，以便第一次单击一个框除了选择之外没有其他选项（因为某些内容已经突出显示）......
答案 0 :(得分：0)
解决我的INITIAL问题的诀窍似乎是在填充每个列表以设置.ListIndex = 0之后，但这仅在使用.SetFocus之后才有用
解决！ （现在，我认为）
尽管这并没有突出显示任何内容，但它允许我第一次选择某些内容。