sorry heres the code
CODE
Private Sub Command1_Click()
If Command1.Caption = "Click Here To Start" Then
Command1.Caption = "Start"
Text1.Enabled = True
Else
If Command1.Caption = "Start" Then
Timer1.Enabled = True
Command1.Caption = "Stop"
Text1.Enabled = False
Else
Timer1.Enabled = False
Command1.Caption = "Start"
Text1.Enabled = True
End If
End If
End Sub
Private Sub Label4_Click()
End Sub
Private Sub Command2_Click()
If Command2.Caption = "Test" Then
Command2.Caption = "1"
End If
End Sub
Private Sub Text1_Change()
If Val(Text1.Text) < 0.0001 Then
Text1.Text = ""
End If
Timer1.Interval = Val(Text1.Text) * 1000
End Sub
Private Sub Timer1_Timer()
LeftClick
End Sub
Private Sub Command1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then
Timer1.Enabled = False
Command1.Caption = "Start"
Text1.Enabled = True
Else
If KeyCode = vbKeyF2 Then
Timer1.Enabled = True
Command1.Caption = "Stop"
Text1.Enabled = False
End If
End If
End Sub
I made a button called Test and I want it when I click it, the number will change. and there will be Reset Button. oh and i also need help with the hotkey. I cant really explain it but is like i open the program, i click on my desktop and hit F2, nothin happens, it suppose to click. is there a way to fix that?
This post has been edited by koolazngy94: 29 Jul, 2008 - 03:29 PM
29 Jul, 2008 - 03:21 PM
| 