Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations bkrike on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
disable/enable Insert key?
- Thread starter steve728
- Start date
place this in the Key Down property of the control or form
Select Case KeyCode
' If user presses insert or shift
Case 45, 16
' Disable the keystroke by setting it to 0
KeyCode = 0
Case Else
Debug.Print KeyCode, Shift
End Select
to find the code for any key press create a web page and place it on your desk top and paste the following code in the html page when you press a key it will display the value
<HTML>
<HEAD>
<TITLE>keyCode</TITLE>
</HEAD>
<BODY onkeydown="displaykey();">
<INPUT TYPE="text" name="text1">
</BODY>
<SCRIPT>
function displaykey() {
text1.value=event.keyCode+' : '+String.fromCharCode(event.keyCode);
}
</SCRIPT>
</HTML>
Select Case KeyCode
' If user presses insert or shift
Case 45, 16
' Disable the keystroke by setting it to 0
KeyCode = 0
Case Else
Debug.Print KeyCode, Shift
End Select
to find the code for any key press create a web page and place it on your desk top and paste the following code in the html page when you press a key it will display the value
<HTML>
<HEAD>
<TITLE>keyCode</TITLE>
</HEAD>
<BODY onkeydown="displaykey();">
<INPUT TYPE="text" name="text1">
</BODY>
<SCRIPT>
function displaykey() {
text1.value=event.keyCode+' : '+String.fromCharCode(event.keyCode);
}
</SCRIPT>
</HTML>
- Thread starter
- #3
Good explanation, jioek.
Steve728,
You're not exactly "disabling the key," you're just capturing the keystroke in this form only, and canceling (or changing) it's normal action.
Case 45
' Disable the usual action by setting it to 0
KeyCode = 0
'code to call the fancy sub routine with the new action
Steve728,
You're not exactly "disabling the key," you're just capturing the keystroke in this form only, and canceling (or changing) it's normal action.
Case 45
' Disable the usual action by setting it to 0
KeyCode = 0
'code to call the fancy sub routine with the new action
- Thread starter
- #5
- Status
Similar threads
- Locked
- Question