براتون این فایلی که گذاشتم برای ساخت یه پازل هست که توضیح هم دادم.

http://s2.picofile.com/file/7290672903/Bazi.pdf.html

ساخت تایمر

در قسمت General

s = 0,mn = 2

 در رویداد خود Timer

 If s = 0 Then mn = mn - 1: s = 59
 If s > 0 Then s = s - 1
 If mn = 1 And s = 0 Then mn = 0: s = 59
 If s = 0 And mn = 0 Then MsgBox "ShomaBarande Nashodid."
lbl1.Caption = mn & ":" & s