PDA

Vollständige Version anzeigen : Tastenkombi "Shift+Tab" (Tab Rückwärts) deaktivieren


Kigo
02.10.2001, 09:07
Hi Leute,

wie bekomme ich es hin, daß ich die Tastenkombination Shift+Tab in einem Formular nicht mehr zulasse? Ich möchte, daß der Anwender nur noch mit Tab vorwärts und nicht mehr zurück gehen kann.

RDiers
06.10.2001, 20:28
mit dem KeyDown event fangen Sie sowas ab. Bitte achten Sie darauf, dass die KeyPreview-Eigenschaft (Tastenvorschau) des Formulars True ist!
Hier etwas code:

Private Sub txtOrtSuchen_KeyDown(KeyCode As Integer, Shift As Integer)
Dim intUmschaltGedr As Integer
Dim intStrgGedr As Integer
Dim intAltGedr As Integer

intUmschaltGedr = (Shift And acShiftMask) > 0
intAltGedr = (Shift And acAltMask) > 0
intStrgGedr = (Shift And acCtrlMask) > 0

Select Case KeyCode
Case 65 To 90 'Buchstaben (groß und klein)
Case 186, 192, 222 'KeyCode Umlaute: ü, ö, ä (und Ü, Ö, Ä)
Case vbKeyBack
Case vbKeyTab 'damit ich in ein anderes Feld komme
Case vbKeyEscape
lstPLZ_Ort.RowSource = ""
Case Else
KeyCode = 0 'Alles andere nicht zulassen
End Select

End Sub