Disallowing keyboard navigation in forms 1

[xhonzi]

Where is the setting that disables keys like PGUP, Home, etc..?

I have listboxes that control navigation in my form and I'd like other keyboard based navigation disabled.

xhonzi

 

[TheAceMan1]

Howdy xhonzi . . .

The only setting that disables keys are in the StartUp menu, and they don't involve form navigation. Gotta drum up some code for this one. So in form design view perform the following:
[ol][li]Call up the [blue]properties[/blue] window.[/li]
[li]Set the forms [blue]Key Preview[/blue] event to [blue]Yes[/blue].[/li]
[li]In the [blue]forms code module[/blue] copy/paste the following:

[blue]Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   
   Select Case KeyCode
      Case 9, 13, 33 To 40
         KeyCode = 0 [green]'disable key and/or combination[/green]
   End Select
   
   [green]'KeyCode KeyName
   '***************
   '09      Tab
   '13      Enter
   '38      Up Arrow
   '40      Down Arrow
   '39      Right Arrow
   '37      Left Arrow
   '33      Page Up
   '34      Page Down
   '36      Home
   '35      End[/green]
   
End Sub[/blue]

[/li][/ol]
You can add/remove keys as you wish, just be sure to get the [blue]Case Statement[/blue] correct.

Thats it! . . .

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886