OldSchoolHack

Registrieren / Anmelden Deutsch

Microsoft Visual Basic 6.0 - Hilfe

icon Thema: Microsoft Visual Basic 6.0 - Hilfe

Anmeldungsdatum: Jan 2008

Beiträge: 81

Kann mir jmd sagen was ich falsch mache '?!

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Timer1.Enabled = True
       Timer3.Enabled = True
   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Timer1.Enabled = False
       Timer2.Enabled = False
       Timer3.Enabled = False
   End Sub

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       End
   End Sub

   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Timer2.Enabled = True
   End Sub

   Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
       SendKeys.Send(''VK_LALT'')
       SendKeys.Send(''c'')
       SendKeys.Send(''t'')
       SendKeys.Send(TextBox1.Text)
       SendKeys.Send(''Enter'')
   End Sub

   Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
       Timer1.Enabled = False
       Timer2.Enabled = False
       Timer3.Enabled = False
   End Sub
End Class

__________________

Woher soll ich wissen, was ich denke bevor ich höre, was ich sage?

I'M CONFUSED!
Wait................
Maybe I'm not.