I have to create a message box that only responds to a mouse click on the command button; if the user presses the enter key, it shouldn't answer the command button. Can anyone help?
Printable View
I have to create a message box that only responds to a mouse click on the command button; if the user presses the enter key, it shouldn't answer the command button. Can anyone help?
private Sub Command1_KeyDown(KeyCode as Integer, Shift as Integer)
'vbkeyenter=13
if keycode=vbkeyenter then keycode=0
End Sub
<center>
<HR width=80%>
<img src='http://web.tiscali.it/bertaplanet/im...ertaplanet.gif'>
</center>