Rubrik: Controls · TextBox & RichTextBox | VB-Versionen: VB4, VB5, VB6 | 10.01.01 |
Immer, wenn in einem einzeiligen Eingabefeld (TextBox) die Enter-Taste gedrückt wird, ertönt ein lästiger "BING". Anstelle des "BINGS" wäre es schön, wenn der Eingabefokus einfach auf das in der TabIndex-Reihenfolge nächste Steuerelement gesetzt würde. Der nachfolgende Tipp verrät Ihnen, wie's funktioniert.
Private Sub Text1_KeyPress(KeyAscii As Integer)
' BING abfangen und Fokus auf nächstes
' Steuerelement setzen
If KeyAscii = 13 Then
KeyAscii = 0
SendKeys "{TAB}", True
End If
End Sub