Office中国论坛/Access中国论坛

标题: 如何让组合框自动显示值列表最后一行？ [打印本页]

作者: passlake 时间: 2011-3-19 11:28
标题: 如何让组合框自动显示值列表最后一行？
组合框行来源为一字段，有N行记录，想在窗体打开时，自动显示最后一行的值，如何设置？
或用VBA设置，简单点的，最好不用循环。

作者: todaynew 时间: 2011-3-19 17:12
假设组合框名曰：Combo0 ，则在窗体的加载事件中写：
Dim n As Long
n = Me.Combo0.ListCount
Me.Combo0.value = Me.Combo0.Column(0, n - 1)

作者: 红尘如烟 时间: 2011-3-19 19:25
Me.组合框A = Me.组合框A.ItemData(Me.组合框A.ListCount-1)

作者: passlake 时间: 2011-3-20 08:46
谢谢两位版主

作者: ptlijx 时间: 2011-3-23 20:26

作者: hope678 时间: 2011-6-27 11:03
学习了

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