【发布时间】:2015-09-16 23:59:50
【问题描述】:
我发现了这个问题... EASY: vba: Looking through a listbox and selecting the contents 但它似乎选择了每个项目......不是很有用。
我需要加载已突出显示的现有值的弹出表单的 ListBox,以便用户能够添加或删除项目。
For x = 1 To rs.RecordCount
For Each ItemIndex In lbFA.?????
If lbFA.ItemData(ItemIndex) = rs!FunctionalArea Then
lbFA.Selected(ItemIndex) = True
End If
Next y
Next x
lbFA.????? 区域中有什么?我认为这是我唯一缺少的部分。
【问题讨论】:
-
您可以为 ItemIndex = 0 到 lbFA.listCount -1 执行标准 for 循环。这样,如果多列列表框 > lbfa.column(col_id, ItemIndex),您也可以从不同列获取值