View Single Post
 
Old 08-30-2021, 04:08 AM
gorkac gorkac is offline Windows 10 Office 2019
Advanced Beginner
 
Join Date: Jul 2021
Posts: 62
gorkac is on a distinguished road
Default

I would just need to replace Private Sub Timer1_Timer () with this timer, I think:

Code:
Public Declare Function SetTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long

Public Declare Function KillTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long) As Long

Public TimerId As Long, Var As Long
But this code will not be adapted to do the same as Timer
Reply With Quote