Office中国论坛/Access中国论坛

标题: 如何给动态组合框赋值 [打印本页]

作者: lazybird 时间: 2015-5-21 09:08
标题: 如何给动态组合框赋值
当组合框的数据源为动态时，如何用代码将数据源的第一行（或者其他行）赋值给组合框。

比如说，组合框 cobEmpName 的数据源为动态（随着 txtDepartment 的值改变）：
"SELECT Table1.EmpName FROM Table1 WHERE (((Table1.Department)=[Forms]![Form1]![txtDepartment]))"

改变后如何将数据源中的某一行赋值给组合框作为默认值。

想了几个方法都觉得好复杂，高手帮看看有没有简便的方法，多谢了。

作者: todaynew 时间: 2015-5-21 10:44
在txtDepartment控件的更新后事件中写：
me.cobEmpName.RowSource="SELECT EmpName FROM Table1 WHERE Department='" & me.txtDepartment.value & "'"

作者: lazybird 时间: 2015-5-21 11:15
回版主：我的问题是组合框 cobEmpName 的 RowSource 更新后，如何同时让 RowSource 里面的第一行（某一行）赋值给组合框。

比如： txtDepartment 选了“工程部”，cobEmpName 变成“张三”（即工程部里面的某个人）。

作者: todaynew 时间: 2015-5-21 11:28

lazybird 发表于 2015-5-21 11:15
回版主：我的问题是组合框 cobEmpName 的 RowSource 更新后，如何同时让 RowSource 里面的第一行（某一行） ...

me.cobEmpName.RowSource="SELECT EmpName FROM Table1 WHERE Department='" & me.txtDepartment.value & "'"
me.cobEmpName.Value = me.cobEmpName.Column(0, 0)

作者: lazybird 时间: 2015-5-21 11:38
解决了！！
版主你好厉害 {:soso_e105:}

作者: zpy2 时间: 2015-5-22 04:56
学习，收藏！

作者: p51219 时间: 2016-7-10 10:04
谢谢分享！

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