Combo Box drop down on mouse hover show & hide

[aamer]

i am using the following code and it works fine





Private Sub CboTSF_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Me.CboTSF.SetFocus
Me.CboTSF.Dropdown

End Sub


The problem with this code is as I move mouse on the combo box it drops down (Which It should) butt i want to add a code so when I move the mouse pointer away from combo box, the drop down list of combo box is closed.

[pbaldy]

Try adding code to the mouse move event of the detail section of the form (or the section containing the combo).

[aamer]

can you guide what code

[pbaldy]

Set focus somewhere else.

[aamer]

I tried the following but even this is not working


Private Sub CboTSF_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Me.CboTSF.SetFocus
Me.CboTSF.Dropdown
Else
Forms("AccTitleSearchFrm").SetFocus

End Sub

[pbaldy]

Well, you don't have an If or an End If, but I think all you need is code in the detail section's mouse move event.

[aamer]

can u help me writing the code i dont have much experience

[isladogs]

Remove the added Else and set focus lines from your code
Then as already stated by pbaldy add a mouse move event to the detail section

Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    
    Me.SomeOtherControlName.SetFocus
    
End Sub

Use a suitable control name from your form in the above code