类似Combobox下拉列表收起功能！！！

[twohorses]

vb中的Combobox控件，下拉列表打开后，点击Combobox控件以外的其他控件，下拉列表就会收起。我自定义了一个控件，使用text和listbox组合起来的，当listbox显示出来后，点击其他地方怎么能让listbox隐藏起来，失去焦点的事件不行，因为点击窗体或label等控件时，不会触发失去焦点的事件，有什么办法可以做成类似Combobox的功能？Combobox是什么原理？不可能遍历所有控件的click事件吧

[of123]

其实有一个更加合理的方法，在 TextBox 中嵌入一个按钮控件。ListBox 不可见时，它呈现一个向下的三角，点击显示 ListBox，同时显示为一个相向上的三角。再点击，使 ListBox 的 visible 属性为假。

[of123]

否则，要靠点击其他位置隐藏，就要在包括 Form 的所有控件的 GotFocus 事件中都写上使 ListBox 隐藏的语句。

[twohorses]

引用 2 楼 of123 的回复:

否则，要靠点击其他位置隐藏，就要在包括 Form 的所有控件的 GotFocus 事件中都写上使 ListBox 隐藏的语句。

vb自带的combobox是什么原理，点击其他地方下拉列表就自动收起；甚至点击其他软件的时候也会收起。

[舉杯邀明月]

用SetCapture （大概是这个名字）这个API。

在List显示之后，把“鼠标捕捉”设置到 ListBox 上。
然后，在ListBox 的Click事件中，ReleaseCapture和隐藏List控件。

不过在IDE中运行时，似乎“有点不正常”，但编译后的exe是完全正常的。

[twohorses]

引用 4 楼 Chen8013 的回复:

用SetCapture （大概是这个名字）这个API。 在List显示之后，把“鼠标捕捉”设置到 ListBox 上。 然后，在ListBox 的Click事件中，ReleaseCapture和隐藏List控件。 不过在IDE中运行时，似乎“有点不正常”，但编译后的exe是完全正常的。

这个感觉有可能，回头试试

[脆皮大雪糕]

把你这几个东西封装成一个UserControl对象，在UserControl_LostFocus() 事件里面隐藏你的文本框呢。
然后整体当做一个控件使用，多舒服，不要在form上倒腾太多。

[twohorses]

引用 6 楼 chewinggum 的回复:

把你这几个东西封装成一个UserControl对象，在UserControl_LostFocus() 事件里面隐藏你的文本框呢。 然后整体当做一个控件使用，多舒服，不要在form上倒腾太多。

问题是你点击窗体或者其他控件，根本捕捉不到UserControl_LostFocus() 这个事件？

[思考]

你想做一个类似Combobox控件？为什么不用Combobox控件

[良朋]

你想做一个类似Combobox控件？为什么不用Combobox控件， 你可以修改Combobox的drop属性，达到你要的效果。

[舉杯邀明月]

楼上两位：　你们的ComboBox，能有这种效果么…………