Office中国论坛/Access中国论坛

标题: 求解:列表框是多重选择类型的取值 [打印本页]

作者: tobbs    时间: 2011-5-2 10:52
标题: 求解:列表框是多重选择类型的取值
一个列表框,用了多重选择,由于不能用List.value的方式获取列表框当前值,所以用了如下方式获取当前值。现在的问题是:单击选择列表框项能正常取值,但用方向键上下选择值的时候,值就不能同步显示了,具体见附件,先谢谢各位老大费心帮助了。
   Dim ctl As Control, x As Variant
    Set ctl = Me.List0
    For Each x In ctl.ItemsSelected
       yy = ctl.Column(0, x)
       yyy = ctl.Column(1, x)
    Next
    Set ctl = Nothing

http://www.accessoft.com/userfiles/tobbs/20110502003048.rar

作者: tobbs    时间: 2011-5-2 12:44
up              
作者: xinrenq    时间: 2011-5-2 19:58
在列表框键释放事件,也就是keyup事件写上一样的代码就可以了
作者: tobbs    时间: 2011-5-2 21:40
问题解决,多谢,咳,,,,经验不足
作者: ycxchen    时间: 2011-5-4 15:26
yy 、 yyy 为何不用声明变量类型的?




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3