Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > .NET Languages
You last visited: Today at 05:56

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[VB.Net] SendKeys Bzw. SendWait Frage

Discussion on [VB.Net] SendKeys Bzw. SendWait Frage within the .NET Languages forum part of the Coders Den category.

Reply
 
Old   #1
 
Diablo_'s Avatar
 
elite*gold: 5
Join Date: Sep 2010
Posts: 9,927
Received Thanks: 4,387
[VB.Net] SendKeys Bzw. SendWait Frage

Hallo alle zusammen,

ich habe eine Frage, die wie folgt lautet:

Ich habe ein Private Sub gemacht und möchte wenn F12 gedrückt wird, das etwas passiert.

Allerdings mache ich das nicht mit einem Timer oder sowas. Ich möchte einfach, wenn die Form aktiv ist und man F12 drückt, das etwas passiert.

Man kann es ja leider nicht so machen:

Code:
If SendKeys.SendWait("{F12}") = True Then

Aktion startet

End If
Weiß da jemand wie ich das machen kann? Im Internet finde ich nur diesen Chatspammer Mist.

Grüße
Diablo_ is offline  
Old 10/08/2011, 18:38   #2
 
elite*gold: 5
Join Date: Aug 2008
Posts: 146
Received Thanks: 19
über ein timer würde es so gehen
Dim hotkey1 As Boolean ' <-- hier erstmal den hotkey definieren
hotkey1 = GetAsyncKeyState(123) <-- 123 für F12
If hotkey1 = True Then ' < -- wenn er dann ausgelöst wird
End if

über send keys würde mir das eigenartig vorkommen da du immerhin die Tasten sendest und nicht abfrägst
sepei is offline  
Thanks
1 User
Old 10/08/2011, 19:10   #3
 
elite*gold: 59
Join Date: Jun 2007
Posts: 374
Received Thanks: 86
Wie "sepei" schon sagte, nutz lieber einen Timer.
Denn alles andere wäre zu kompliziert.
Denn du musst ja etwas haben, was die ganze Zeit überprüft ob die Taste gedrückt wurde oder nicht.
Und über einen Timer ist es die einfachste Möglichkeit meiner Meinung nach.
Devil589 is offline  
Thanks
1 User
Old 10/08/2011, 20:34   #4
 
Kraizy​'s Avatar
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,696
Received Thanks: 1,811
PHP Code:
Private Sub Form1_KeyDown(ByVal sender As System.ObjectByVal e As System.Windows.Forms.KeyEventArgsHandles MyBase.KeyDown
        
If e.KeyCode Keys.F12 Then

        End 
If
    
End Sub 
Kraizy​ is offline  
Thanks
1 User
Old 10/08/2011, 20:50   #5
 
Diablo_'s Avatar
 
elite*gold: 5
Join Date: Sep 2010
Posts: 9,927
Received Thanks: 4,387
Danke euch 3 erstmal. Werde es morgen ausprobieren.
Diablo_ is offline  
Old 10/08/2011, 21:03   #6
 
Magiston's Avatar
 
elite*gold: 591
Join Date: Sep 2011
Posts: 578
Received Thanks: 188
Quote:
Originally Posted by sepei View Post
über ein timer würde es so gehen
Dim hotkey1 As Boolean ' <-- hier erstmal den hotkey definieren
hotkey1 = GetAsyncKeyState(123) <-- 123 für F12
If hotkey1 = True Then ' < -- wenn er dann ausgelöst wird
End if

über send keys würde mir das eigenartig vorkommen da du immerhin die Tasten sendest und nicht abfrägst
Wenn du das so in dein Timer Event einfügst, dürfte es nicht klappen. Kannst es ja mal ausprobieren.

Quote:
Originally Posted by xKraizy View Post
PHP Code:
Private Sub Form1_KeyDown(ByVal sender As System.ObjectByVal e As System.Windows.Forms.KeyEventArgsHandles MyBase.KeyDown
        
If e.KeyCode Keys.F12 Then

        End 
If
    
End Sub 



@Threadinhaber
Sollte wiederholt ein Problem auftreten, so kannst du dich gerne an mich wenden.
Magiston is offline  
Old 10/09/2011, 10:14   #7
 
elite*gold: 5
Join Date: Aug 2008
Posts: 146
Received Thanks: 19
Quote:
Originally Posted by Magiston View Post
Wenn du das so in dein Timer Event einfügst, dürfte es nicht klappen. Kannst es ja mal ausprobieren.






@Threadinhaber
Sollte wiederholt ein Problem auftreten, so kannst du dich gerne an mich wenden.
Natürlich musst du noch den Timer starten aber sonst funktioniert das so wirklich gut wird bei mir auch in der schule für ein Anti Lehrer programm eingesetzt ^^
Die zweite Methode habe ich gerade getestet aber scheint bei mir nicht zu funktionieren da das Event bei mir nie eintrat.
Aber der Entscheidende Vorteil meiner Meinung nach ist an meiner Methode das wenn das Programm auch irgendwo im Hintergrund läuft es erkennt ob diese Taste gedrückt wird. D.h du könntest sogar ein Game im Vollbild laufen lassen und das Programm würde erkennen das die Taste gedrückt wurde.
sepei is offline  
Old 10/09/2011, 11:14   #8
 
Magiston's Avatar
 
elite*gold: 591
Join Date: Sep 2011
Posts: 578
Received Thanks: 188
Quote:
Originally Posted by sepei View Post
Natürlich musst du noch den Timer starten aber sonst funktioniert das so wirklich gut wird bei mir auch in der schule für ein Anti Lehrer programm eingesetzt ^^
Die zweite Methode habe ich gerade getestet aber scheint bei mir nicht zu funktionieren da das Event bei mir nie eintrat.
Aber der Entscheidende Vorteil meiner Meinung nach ist an meiner Methode das wenn das Programm auch irgendwo im Hintergrund läuft es erkennt ob diese Taste gedrückt wird. D.h du könntest sogar ein Game im Vollbild laufen lassen und das Programm würde erkennen das die Taste gedrückt wurde.
Quote:
Dim hotkey1 As Boolean ' <-- hier erstmal den hotkey definieren
hotkey1 = GetAsyncKeyState(123) <-- 123 für F12
If hotkey1 = True Then ' < -- wenn er dann ausgelöst wird
End if
GetAsyncKeyState müsste fehlerhaft angestrichen sein. Die Funktion muss deklariert werden. Außerdem fehlt das Hochkomma in Zeile 2, um dies als Kommentar zu deuten.
Magiston is offline  
Old 10/09/2011, 13:07   #9
 
Kraizy​'s Avatar
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,696
Received Thanks: 1,811
@Magiston Vielleicht soll es ja kein C&P-Code sein..
Trotzdem versteh ich nicht, warum man einen Timer + GetAsyncKeyState nehmen sollte, wenn das ganze auch einfach über das Form_KeyDown-Event geht. Der TE sagte ja, wenn seine Form im Vordergrund ist bzw. den Fokus besitzt, da reicht sowas völlig aus..
Kraizy​ is offline  
Reply


Similar Threads Similar Threads
VS C++ SendKeys an Fenster senden
09/21/2010 - C/C++ - 14 Replies
Hallo ich würde gerne mit private: System::Void timer1_Tick(System::Object^ sender, System::EventArgs^ e) { SendKeys::Send ("{ENTER}"); Sleep(3000); SendKeys::Send ("{TAB}"); SendKeys::Send ("1");
rPE SendKeys
02/04/2010 - Ragnarok Online - 3 Replies
HI, is it possible to use "SendKeys" in rPE custom filters?? so that when i recieved a packet it will press/send a specified KEY... for example when i recieved the packet "00522F" it will send/press "F1" ..
SendKeys.Send Problem
12/31/2009 - General Coding - 1 Replies
Hello, Using Visual Basic 8, here is my code: SendKeys.Send("{LCTRL}") This returns an unhandled error. How do I re-code this?
SendKeys
03/25/2009 - Flyff - 10 Replies
Mal eine Frage an alle Programmierer ich habe mir einen Petfeeder geproggt mi dem befehl SendKeys ("{F3}{Enter}") wenn ich nun bei Flyff reingehe also original Server dann macht der bo Garnichts das dachte ich mir schon von anfang an wegen dem GG. Dann gehe ich bei FlyForFame rein dort ist das iwie komisch er drückt Enter aber nicht F3 bzw irgendeine F taste aber Enter schon ??? jetzt ist die frage wie schaffe ich es entweder den Code so zu schrieben dass es funkt alo mit einem anderen...
Free zu Sendkeys...
09/11/2008 - Metin2 - 4 Replies
€dit: Meinte Frage zu Sendkeys^^ Sry... Hi, ich probiere in letzter zeit immer naja son Zeug halt aus um auch irgendwann was gutes zu scripten =) ... Immoment mache ich nur nen paar sachen mit .bat Dateien die dann halt über andere Dateien was schicken usw halt ... Jetzt muss ich aber was drücken >.> will aber nich dabei sein...



All times are GMT +1. The time now is 05:58.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.