Private Sub Başlat_Click()
Timer1.Enabled = True
Timer2.Enabled = True
End Sub
Private Sub Command1_Click()
Timer1.Enabled = True
Timer2.Enabled = True
End Sub
Private Sub Durdur_Click()
Timer1.Enabled = False
Timer2.Enabled = False
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
Timer2.Enabled = False
End Sub
Private Sub Command3_Click()
End
End Sub
Private Sub dsada_Click()
MsgBox ("www.junior-hacker.tr.gg"), 41, ("juniorhacker")
End Sub
Private Sub Form_Load()
End Sub
Private Sub Option1_Click()
Timer1.Interval = 400
Timer2.Interval = 401
End Sub
Private Sub Option2_Click()
Timer1.Interval = 150
Timer2.Interval = 150
End Sub
Private Sub Option3_Click()
Timer1.Interval = 50
Timer2.Interval = 51
End Sub
Private Sub Option4_Click()
Timer1.Interval = 27
Timer2.Interval = 26
End Sub
Private Sub Timer1_Timer()
SendKeys Text1.Text
End Sub
Private Sub Timer2_Timer()
SendKeys "{Enter}"
End Sub
Timer1.Enabled = True
Timer2.Enabled = True
End Sub
Private Sub Command1_Click()
Timer1.Enabled = True
Timer2.Enabled = True
End Sub
Private Sub Durdur_Click()
Timer1.Enabled = False
Timer2.Enabled = False
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
Timer2.Enabled = False
End Sub
Private Sub Command3_Click()
End
End Sub
Private Sub dsada_Click()
MsgBox ("www.junior-hacker.tr.gg"), 41, ("juniorhacker")
End Sub
Private Sub Form_Load()
End Sub
Private Sub Option1_Click()
Timer1.Interval = 400
Timer2.Interval = 401
End Sub
Private Sub Option2_Click()
Timer1.Interval = 150
Timer2.Interval = 150
End Sub
Private Sub Option3_Click()
Timer1.Interval = 50
Timer2.Interval = 51
End Sub
Private Sub Option4_Click()
Timer1.Interval = 27
Timer2.Interval = 26
End Sub
Private Sub Timer1_Timer()
SendKeys Text1.Text
End Sub
Private Sub Timer2_Timer()
SendKeys "{Enter}"
End Sub