Microsoft Visual Basic 6.0 help - Creating an OCX

Creating a count down timer can be tricky even for an advanced programmer, the idea of a counter is almost the same except we count down in this case, counting up as a default counter relies on adding (1) to the value of an integer variable in a timer tool, and the best example for this is the (Clock / Timer) where you put:

in a timer control whose interval is (1000 ms) and finaly in (Form_Load) event you triger the (Timer1_Timer) event by setting its (Enabled) value = (True).

In our example (The Count Down Timer) we don't just inverse the previous process, we create a new method as shown in the source code. The idea of a count down timer is : variable integer = value minus (-1, -2, -3, ......) another integer variable in a timer i.e. (Sec) integer variable = 10, 10 is start of the down-counter, in the timer event (Sec = Sec - 1), but if we finished at this point, we won't get anything, the result will be infinite , and here lies the trick, we must do checking for sec's value (if = 0 then exit sub or anything) then label1.Caption = Sec, only then we will see a count down to (0).

Here is the source code for the example above, try to enhance it the way you like by adding some codes in the Sub Reset().
Source Code at MediaFire.com

As an extension to this Count Donw Timer i developed a CountDownTimer.OCX file to be used on Visual Basic 6.0 Projects.The Ocx is deployed and ready to setup and also deployed in Source Code uploaded at MediaFire.com Link.