H
Bir proje açın iki tane Timer ekleyin
timer1 Enable si True olcak intervali de 200 olcak
timer2 Enablesi False olcak intervalide 100 olarak kalsın 100 den aşagı düsürürsen daha cok hızlı basar
sonra timerlara sırayla tıkla
sonra kod bölümünde kodlar bu şekilde olcak şekilde kopyala yapıstır
sonra programı calıstır sen ctrl ye bastıgın an A harfine basmaya baslıcaktır tekrar Ctrl ye bastıgında duracaktır
timer1 Enable si True olcak intervali de 200 olcak
timer2 Enablesi False olcak intervalide 100 olarak kalsın 100 den aşagı düsürürsen daha cok hızlı basar
sonra timerlara sırayla tıkla
sonra kod bölümünde kodlar bu şekilde olcak şekilde kopyala yapıstır
sonra programı calıstır sen ctrl ye bastıgın an A harfine basmaya baslıcaktır tekrar Ctrl ye bastıgında duracaktır
Code:
Public Class Form1
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Integer) As Integer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(Keys.ControlKey) Then
If Timer2.Enabled = False Then
Timer2.Enabled = True
Else
Timer2.Enabled = False
End If
End If
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
SendKeys.Send("A")
End Sub
End Class