Im KeyPress-Event der Textbox "Kopieren" und "Einfügen" zulassen

Pry · 12. Januar 2011, 17:45

Hallo,

ich verwende in einem Programm eine Textbox, bei der ich nur gewisse Eingaben zulasse. Dies sieht folgendermaßen aus:

VB.NET-Quellcode

If InStr("12340" & Chr(8), e.KeyChar.ToString) Then Else e.Handled = True

ich möchte jedoch auch die Tastenkombination STRG+C und STRG+V zulassen, habe nur keine Ahnung, wie ich das realisieren kann. Hat jemand eine Idee?

Viele Grüße und Dank,
Pry

YaPh1l · 12. Januar 2011, 17:48

Frage e.Control und e.KeyCode entsprechend ab.

Viele Grüße, Phil.

Pry · 12. Januar 2011, 17:53

YaPh1l schrieb:

e.Control

Kann ich nicht nachvollziehen. Gibt's bei mir nicht

YaPh1l · 12. Januar 2011, 19:47

Stimmt. Wäre es ein Problem für dich, das KeyDown-Ereignis zu nehmen? Da gibt's e.Control nämlich.
Für KeyPress sehe ich keine Möglichkeit, Strg abzufragen.

Viele Grüße, Phil.

Pry · 12. Januar 2011, 20:55

Hi Phil,

habe es jetzt so gemacht. Geht wahrscheinlich auch einfacher, aber damit habe ich erreicht, was ich möchte

Danke schön!

VB.NET-Quellcode

Private Sub txtCode_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtCode.KeyDown
Select Case e.KeyCode
Case 48 To 52 : e.SuppressKeyPress = False '0 bis 4
Case 96 To 100 : e.SuppressKeyPress = False '0 bis 4 (Numpad)
Case 8 : e.SuppressKeyPress = False 'Backspace
Case 67 : If e.Control Then e.SuppressKeyPress = False Else e.SuppressKeyPress = True 'STRG+C
Case 86 : If e.Control Then e.SuppressKeyPress = False Else e.SuppressKeyPress = True 'STRG+V
Case Else : e.SuppressKeyPress = True
End Select
End Sub

Viele Grüße,
Pry

Im KeyPress-Event der Textbox "Kopieren" und "Einfügen" zulassen

Im KeyPress-Event der Textbox "Kopieren" und "Einfügen" zulassen

VB.NET-Quellcode

YaPh1l schrieb:

VB.NET-Quellcode

Tags

Ähnliche Themen

2 Benutzer haben hier geschrieben