[VB] Bestimmte tasten zum beenden

[Xenon808]

Hallo.
ICh möchte das so haben dass wenn ich bestimmte tasten wie z.b A +B drücke dass sich das programm dann schließt

Welchen Code brauche ich dafür?

[Fox-Jet]

Du schleißt das Programm ja normal mit

Me.Close()

Binde einfach die zwei Tasten, das wenn du jetzt A+B drückst, das der Befehl "Me.Close()" Ausgeführt wird

[nathex]

Versuch mal das hier: Ist allerdings VB6... kann man aber bestimmt umschreiben.

setze das Form-Property auf
KeyPreview = True

Dann programmiere den Form_KeyPress() Event:
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyEscape Then
Call Unload(Me)
End If
End Sub

Hierbei würde sich das Programm beim drücken von Escape schließen.

[Xenon808]

Du schleißt das Programm ja normal mit

Binde einfach die zwei Tasten, das wenn du jetzt A+B drückst, das der Befehl "Me.Close()" Ausgeführt wird

Aber wie lautet denn der code für die tasten

Am besten wäre es noch wenn man es nur mit den tasten beenden könnte, also nicht mit ALT+F4

[nathex]

Hast du meine Methode schon ausprobiert? Da kannst du doch eine Taste bestimmen oO

[Fox-Jet]

Abber er meint, das er mit 2 Tastenkombinationen in dem Fall ( A+B) das gleiche erreicht wie wenn er Alt+F4 drückt, odder einen Butten macht und den mit "Me.Close()" Belegt

Ich vasteh schon Xenon808 sry hab zu wenig zeit um nachzuschaun, Fahr jz dann Urlaub

Sonst schreib mir einfach ne PM dann schau ich nach wenn ich in einer Woche heimkomm

[Xenon808]

Abber er meint, das er mit 2 Tastenkombinationen in dem Fall ( A+B) das gleiche erreicht wie wenn er Alt+F4 drückt, odder einen Butten macht und den mit "Me.Close()" Belegt

Ich vasteh schon Xenon808 sry hab zu wenig zeit um nachzuschaun, Fahr jz dann Urlaub

Sonst schreib mir einfach ne PM dann schau ich nach wenn ich in einer Woche heimkomm

Genau so meinte ich das
Allerdings habe ich 2008 express

[Schlumpf2009]

hier mal ein beispiel für die a+b taste zum beenden der anwendung

vorarbeit : einen timer auf die form ziehen und so belassen wie er ist
denn die einstellungen mache ich normal immer innerhalb des codes
da es besser nachvollziehbar ist

Public Class Form1
             Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal nVirtKey As Keys) As Short
                     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
                                 Timer1.Enabled = True ' wir starten den timer der die a+b taste prüft beim programmstart mit
                     End Sub
                     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
                        Select Case True
                                           Case GetAsyncKeyState(Keys.A) <> 0 And GetAsyncKeyState(Keys.B) <> 0 ' wenn A UND B zusammen gedrückt werden
                                      Timer1.Enabled = False ' timer deaktivieren ( die msgbox geht sonst 2x auf *fg )
                                      MsgBox("ich beende mich nun *wink") ' nur ne nachricht das a+b die form1 zu macht
                                      Me.Close() ' form1 beenden
                        End Select
               End Sub
End Class 

edit : und ja es ist schon lage her aber es hilft vielleicht doch dem einen oder anderen
edit2 : und ja es ist vb.net 2008 habe nur die ansicht als php genommen da es schöner aussieht *g