Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

请教:单击组合框后,组合框内容呈现选中状态如何实现?

秋日心情  发表于:2012-01-17 13:33:41  
复制

鼠标单击组合框时,希望使组合框的值呈现选中状态,方便输入(输入几个字符模糊查询)

我使用了组合框的Click、Gotfocus事件,但感觉还没达到要求,请大家帮忙看下该怎么样实现?

 

 

Private Sub cmob1_GOTFOCUS()
    cmob1.SelLength = Len(cmob1.value)
End Sub

或者用

 

Private Sub cmob1_Click()
    cmob1.SelLength = Len(cmob1.value)
End Sub

 

效果都不好

 

Top
蟹仔 发表于:2012-01-17 13:44:20

他本身不加任何代码就是选中状态,不知你要干嘛。



秋日心情 发表于:2012-01-17 14:01:09

 

如果点击下拉三角弹出列表框,在这里选择时本身是选中状态的,但由于下拉框中内容较多,滚动不是很方便,希望可以单击组合框,使组合框的内容为选中状态,直接输入几个字符即可匹配到需要的内容,楼上的在看看,谢谢!!

 



蟹仔 发表于:2012-01-17 14:09:04
要不你把列表框改装,用1个文本框代替,这样可以写代码做很多事情。例如列表框的行来源可以随着那个文本框的变化而变化,你把附件的2个功能合二为一。效果很不错的点击下载此附件

秋日心情 发表于:2012-01-17 15:04:55

谢谢,楼上的实例我看了,很不错,组合起来差不多。

但我记得文本框的Click事件就可以时间,可不知道为什么组合框的Click为什么不行呢?



风行 发表于:2012-01-17 16:35:26
实现单击组合框下拉最简化的代码-Access软件网
http://www.accessoft.com/article-show.asp?id=6098

在水一方 发表于:2012-01-18 21:55:21
看看我这个例子,文本框简拼查询药品,上下键或滚轮选择查询,回车键或双击选择药品。点击下载此附件

总记录:6篇  页次:1/1 9 1 :