Da tempo mi pongo un quesito....

...ho una Form con delle TextBox dove mi sposto tra una textbox e l'altra con il tasto invio....questo è il codice:

in un modulo inserisco:

<code>----------------------------------------------------

Public Const VK_TAB = &H9

Public Declare Sub keybd_event Lib "user32" _
(ByVal bVk As Byte, _
ByVal bScan As Byte, _
ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)

<\code>----------------------------------------------------

...nell'evento KeyPress della TextBox inserisco:

<code>----------------------------------------------------

If KeyAscii = vbKeyReturn Then
KeyAscii = 0 'elimina il beep
keybd_event VK_TAB, 0, 0, 0 'riproduce il TAB
End If
KeyAscii = Asc(UCase(Chr(KeyAscii)))

<\code>----------------------------------------------------

...con l'ultima riga del codice scrivo maiuscolo.

Fin quì tutto a posto...ma il problema si presenta quando su di una Form ho parecchie TextBox...infatti devo riscrivere il codice per tutti i controlli ad uno a uno.

Quindi c'è un modo con il quale possa sfruttare quel codice una sola volta e che valga per tutte le textBox presenti sul Form?

Grazie se vorrete aiutarmi.