Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
Discussion GroupsFormsForms ProgrammingQueriesModules / DAO / VBAReports / PrintingMacrosDatabase DesignSecurityConversionImporting / LinkingSQL Server / ADPMultiuser / NetworkingReplicationSetup / ConfigurationDeveloper ToolkitsActiveX ControlsNew UsersGeneral 1General 2
Access DirectoryToolsTutorialsUser Groups
Related Topics
SQL ServerOther DB ProductsMS OfficeMore Topics ...

MS Access Forum / Forms Programming / January 2005

Tip: Looking for answers? Try searching our database.

Bullet Proofing for Kids

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Frank Wagner - 28 Jan 2005 03:24 GMT
I have developed an application for learning the
multiplication tables using Access 2000.  I am a little
worried about the kids hitting odd keys, and bringing up
messages they will not be fimiliar with.  Is there a way
that I can block out all the keys except the number keys,
delete, backspace, enter and Capital T?  I suppose this
could be done either for each form or all forms, but I
don't know how

Any help would  be appeciated.

Thanks

Frank Wagner
Allen Browne - 28 Jan 2005 04:40 GMT
First thing is to uncheck the box under:
   Tools | Options | Startup | Special keys

Then set the KeyPreview property of your form to Yes.
Use the *form's* KeyDown property to handle all keystrokes (e.g. not
allowing Alt+F to get to the File menu). It's event procedure will look like
this:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   Call LimitKeystroke(KeyCode, Shift)
End Sub

That calls a function that you store in a standard module, so that you can
call it from all your forms:

Function LimitKeystroke(KeyCode As Integer, Shift As Integer)
   Select Case KeyCode
   Case 96 To 111, vbKeyBack, vbKeyTab, vbKeyReturn
       'Allow numeric keypad, backspace, tab, and enter.
   Case Else
       KeyCode = 0 'destroy every other keystroke.
   End Select
End Function

Signature

Allen Browne - Microsoft MVP.  Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

>I have developed an application for learning the
> multiplication tables using Access 2000.  I am a little
[quoted text clipped - 10 lines]
>
> Frank Wagner
Paul Overway - 28 Jan 2005 04:41 GMT
See help for KeyPress event.  Also, help for KeyPreview property.
Basically, you'd set the KeyAscii return value to 0 for any keys you want
ignored, i.e., (air code follows)

 Select Case KeyAscii
   Case 65 to 83, 85 to 255  'alpha keys and upper ASCII
       keyAscii = 0
   Case 48 to 57, 42, 43, 45, 47  'These are numeric and math
operators...do nothing
   Case 13, 8, 10  'Carriage return, backspace, line feed...do nothing
   Case 84     'T...do nothing
   Case Else
       KeyAscii = 0
   End Select

You'd also need to do something in KeyDown event to trap function keys and
the like.

Signature

Paul Overway
Logico Solutions
http://www.logico-solutions.com

>I have developed an application for learning the
> multiplication tables using Access 2000.  I am a little
[quoted text clipped - 10 lines]
>
> Frank Wagner
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.