主题：[分享]给下拉列表加上“全部”

对于组合框，一般都用getcomboliststring来获取不重复值

 

比如在某组合框的enter事件写代码：

e.Sender.ComboList =  DataTables("表A").GetComboListString("第一列")

就能列出表A的第一列的所有不重复项

 

若希望能在不重复项之前加个“显示全部”这种的，只要将代码改为：

e.Sender.ComboList =  "显示全部|" & DataTables("表A").GetComboListString("第一列")

 

轻轻松松就能加上自定义的项目啦

当然，这只是加上显示项目，具体的选择后的事件，还是要靠自己写代码驱动哟

希望对初学者有帮助哦

 

 

此主题相关图片如下：55.png