Office中国论坛/Access中国论坛

标题: 求助：如何用代码给组合框添加下拉列表 [打印本页]

作者: access新新新手 时间: 2016-1-28 16:50
标题: 求助：如何用代码给组合框添加下拉列表
请问在VB的组合框中如何用代码添加下拉列表
值来源于一个access表的一个字段，并且去重复显示在下拉列表中。

作者: roych 时间: 2016-1-28 17:17
设置数据的行来源 select distinct 字段 from 你的表

作者: access新新新手 时间: 2016-1-28 17:47

roych 发表于 2016-1-28 17:17
设置数据的行来源 select distinct 字段 from 你的表

谢谢老师，我是说VB不是access的VBA

作者: access新新新手 时间: 2016-1-28 18:15

roych 发表于 2016-1-28 17:17
设置数据的行来源 select distinct 字段 from 你的表

谢谢老师关注
RST.Open "select distinct 所属类别 from 通讯录 WHERE 所属类别 IS NOT NULL"
RST.MoveFirst
While Not RST.EOF
Combo1.AddItem RST.Fields("所属类别").Value
RST.MoveNext
Wend

CNN.Close
这样可以实现，请老师看看代码还可以优化吗？

作者: zyp 时间: 2016-1-29 08:30

access新新新手发表于 2016-1-28 18:15
谢谢老师关注
RST.Open "select distinct 所属类别 from 通讯录 WHERE 所属类别 IS NOT NULL"
RST ...

Roych老师是让你将组合框的数据源直接设为：select distinct 字段 from 你的表
或者直接在窗体的加载事件里写入：
me.组合框名称.rowsource="select distinct 字段 from 你的表"

作者: access新新新手 时间: 2016-1-29 09:07

zyp 发表于 2016-1-29 08:30
Roych老师是让你将组合框的数据源直接设为：select distinct 字段 from 你的表
或者直接在窗体的加载事 ...

谢谢！已经实现了。

作者: newglord 时间: 2016-4-9 20:51
不错不错

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)