列表框多值选择

Muk*_*kul 1 ms-access ms-access-2007 access-vba ms-access-2010

我已经基于查询输出创建了表单.我使用了三个组合框和一个列表框.第一个组合框给了我Dept的列表,第二个部门的选择给了我Dept(不同)的位置,第三个给了我(不同的)项目从该位置,然后接下来是显示该项目的一些代码的列表框.问题是我只能从该列表中选择一个代码并在Excel中输出.

如果我想一次选择两个值,我该怎么做?

如果我Multi Select从列表框属性中选择,我可以选择多个值,但我没有得到输出.

Gor*_*son 6

当列表框的Multi Select属性设置为"无"时,您可以通过简单地引用来检索所选值

Me.List0.Value
Run Code Online (Sandbox Code Playgroud)

但是,对于多选列表框控件,您需要遍历ItemsSelected集合以确定所选项:

Dim ItemIndex As Variant
For Each ItemIndex In Me.List0.ItemsSelected
    MsgBox Me.List0.ItemData(ItemIndex)
Next
Run Code Online (Sandbox Code Playgroud)