Arama sonuçlarında karşımıza klavyeden tuşa bastırmak diye çıkan SendKeys aslında istenilen tuş hareketlerini uygulama üzerine göndermek için kullanılır. Nasıl kullanıldığını aşağıdaki örnekleri inceleyerek anlayabilirsiniz.
Karakter ve Kelime Yollamak
Örneğin sadece 1 adet karakter veya kelime yollamak istiyorsunuz. Bunun için aşağıdaki kurala uyan bir kod derleyebilirsiniz.
SendKeys.Send("Kelime yada Harf")
SendKeys.Send("A")
SendKeys.Send("www.bilgi-sayar.net")
Gerekli event aktif olduğunda örneğin bir butona tıklandığında uygulama A harfini yollayacaktır. Yollanmasını istediğiniz harfleri yada kelimeleri tırnakların içine yazmanız yeterli olacaktır.
Özel Karakter Yollamak
Örneğin uygulama üzerinden özel karakterler(!,+,%,^) yollamak istediğinizde aşağıdaki kurala uyan bir kod derleyebilirsiniz.
SendKeys.Send("{Özel Karakter}")
SendKeys.Send("{+}")
SendKeys.Send("{%}")
Yollanmasını istediğiniz özel karakteri (“{-}”) 2 süslü parantezin yani tire(-) işaretinin olduğu yere yazmanız yeterli olacaktır.
Komut Gönderen Tuşları Yollamak
Enter,Backspace,Space gibi komut gönderen tuşları göndermek için SendKeys ile birlikte bu tuşlar için belirlenmiş olan dizimleri de eklememiz gerekiyor.
Örnekler;
Enter tuşu için;
SendKeys.Send("{ENTER}")
BackSpace(Silme) tuşu için;
SendKeys.Send("{BACKSPACE}")
SendKeys.Send("{BS}")
SendKeys.Send("{BKSP}")
Üçünde aynı görevi görmektedir.
ESC tuşu için;
SendKeys.Send("{ESC}")
CapsLock tuşu için;
SendKeys.Send("{CAPSLOCK}")
NumLock tuşu için;
SendKeys.Send("{NUMLOCK}")
PrintScreen tuşu için;
SendKeys.Send("{PRTSC}")
…
Not: SendKeys, flooder tarzı belirlenen hedefe ard arda mesajlar yollayan programların temelini oluşturmaktadır.
böyle bi kod yazdım metin dosyasında çalışıyor ama uygulamaya girdigi zaman enter tuşlarına basmıyor
Private Sub Timer1_Tick_1(sender As Object, e As EventArgs) Handles Timer1.Tick
If TextBox4.Text = “” Then
If TextBox4.Text = “” Then
SendKeys.Send(“{Enter}”)
End If
End If
SendKeys.Send(TextBox2.Text)
If TextBox3.Text = “s” Then
s = s + 1
If s <= TextBox5.Text Then
SendKeys.Send(s)
Else
Button1.PerformClick()
End If
End If
If TextBox4.Text = "" Then
SendKeys.Send("{Enter}")
End If
End Sub
End Class
asda
* uygulama üzerinden deneme gönderilmiştir. Konu için teşekkürler
tam bir ödev sitesi :))