使用表（VBA）中的单个（分隔）字段填充列表框

Posted 2023-05-07

【中文标题】使用表（VBA）中的单个（分隔）字段填充列表框

【英文标题】：Populate listbox using single (delimited) field from Table (VBA)

【发布时间】：2016-07-11 20:21:13

【问题描述】：

如何在 VBA 中做到这一点？ 在表Features 我有列Colors。单个字段有以下数据：black; blue; yellow - 以; 分隔 在Access 表单上，我想用来自该单个字段的数据填充一个列表框（lstColors），以便我获得列表：

black

blue

yellow

任何帮助表示赞赏！

【问题讨论】：

到目前为止你有什么代码？如果您可以将颜色字段分配给 strColors 变量，那么这是一项简单的任务。然后使用逗号分隔符对变量使用拆分函数。然后使用循环将 AddItem 添加到您的列表框。您现在可以使用这些信息构建自己的代码 - 然后返回您遇到的任何问题

【参考方案1】：

将列表框的RowSourceType设置为：ValueList

将 RowSource 设置为您的字段 Colors 中的值，这是一个值列表。