以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何实现对独立窗口中的ComboBox类型下拉窗口,鼠标点击打开,鼠标再次点击关闭?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=113632)

--  作者:z769036165
--  发布时间:2018/1/19 17:13:00
--  如何实现对独立窗口中的ComboBox类型下拉窗口,鼠标点击打开,鼠标再次点击关闭?
如题,目前ComboBox无关闭或打开下拉时的状态变更,需实现鼠标在对ComboBox输入框空白处点击时打开下拉,再次点击时关闭下拉。
--  作者:有点甜
--  发布时间:2018/1/19 17:35:00
--  

click事件

 

Dim obj = e.sender.basecontrol
If obj.DroppedDown = False Then
    Sendkeys.Send("{F4}")
End If