Jumat, 05 September 2014

Re: [MS_AccessPros] Combo Box

 

Thanks Rajiv

The NoKeyDown  works pretty good. Now I placed the code in a Public module so all combo boxes can call.  

I do have a question.  What is the 2nd argument (Shift As Integer) for? I left it out and it still works so far. Will that generate errors someday if the argument's omitted?

Phucon

Public Sub NoKeyDown(KeyCode As Integer)
If KeyCode <> vbKeyTab And KeyCode <> vbKeyReturn Then KeyCode = 0
End Sub Private Sub cboSearch_KeyDown(KeyCode As Integer)
 Call NoKeyDown(KeyCode)
End Sub

__._,_.___

Posted by: saigonf7q5@yahoo.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (23)

.

__,_._,___

Tidak ada komentar:

Posting Komentar