Ragazzi sono nei guai sto facendo un auto clik e volevo abbinare ai bottoni start e stop due tasti tipo F2 per inizio e F3 per fine ma non so come fare aiutatemi per favore
ps: per adesso sono arrivato fino qui
Option Explicit
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const MOUSELEFTDOWN = &H2
Private Const MOUSELEFTUP = &H4
Private Sub Command1_Click()
Timer1.Interval = Text1.Text
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
End Sub
Private Sub Form_Load()
End Sub
Private Sub Timer1_Timer()
mouse_event MOUSELEFTDOWN, 0, 0, 0, 0
mouse_event MOUSELEFTUP, 0, 0, 0, 0
End Sub