باز شدن ليست كمبوباكس به محض حركت نشانگر موس روي آن

[alisabet]

سلام عليكم :


من احتياج به كدي دارم كه به محض حركت نشانگر ماوس روي كادر كمبو باكس ، ليست پائين ريز آن باز شود - يعني بدون فشردن مثلت گوشه آن ، ليست باز شود فقط با حركت ماوس روي آن ، و اگر با دور شدن ماوس بسته هم شود كه ديگر خيلي خوب است

[DOLFIN]

سلام با استفاده از کد زیر هر موقع نشانگر ماوس روی کمبوباکس می رود dropdown میشه ولی برای بستن می بایست روی صفحه کلیک بشه .

Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Me.ComboBox1.DropDown
End Sub