How to change the keyboard function

[lykeat]

Hi there, just want to ask is that any way to change the keyboard function, like when user press enter key, it will act like tab key. So is mean the enter key will become tab key. I need this because i need to change it for faster data entry.

Regards,
Henry

 

[MarkSweetland]

Private Sub Form_Load()
Me.KeyPreview = True
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
SendKeys "{tab}"
End If
End Sub


Mark

"You guys pair up in groups of three, then line up in a circle."
- Bill Peterson, a Florida State football coach