کمک در vb

[computer2000]

سلام
از کاربران بخش vb کسی میتونه این برنامه را کامل کنه؟ من زمان را بر حسب ثانیه تعریف کردم ممنون میشم اگر کسی دقیقه و ساعت را هم تعریف کنه.

---------- Post added at 05:11 PM ---------- Previous post was at 05:00 PM ----------

Option Explicit
Dim intsecond As Integer
Dim intminute As Integer


Private Sub cmdexit_Click()
Dim intexit As Integer
intexit = MsgBox("do you want to exit?", vbYesNo + vbExclamation, "exit of program")
If intexit = vbYes Then
Unload Me
Else
frmtimer.Show
End If
End Sub

Private Sub cmdreset_Click()
Dim intanswer As Integer
intanswer = MsgBox("do you want to reset clock?", vbYesNo + vbQuestion, "reset clock")
If intanswer = vbYes Then intsecond = 0
End Sub

Private Sub cmdstop_Click()
tmrclock.Enabled = False
End Sub

Private Sub cmmdstart_Click()
tmrclock.Enabled = True

End Sub

Private Sub tmrclock_Timer()
intsecond = intsecond + 1
If intsecond = 10 Then intsecond = 0 Or intminute = intminute + 1
lblminute.Caption = intminute
lblsecond.Caption = intsecond
End Sub
این برنامه است

---------- Post added at 05:12 PM ---------- Previous post was at 05:11 PM ----------

Option Explicit
Dim intsecond As Integer
Dim intminute As Integer


Private Sub cmdexit_Click()
Dim intexit As Integer
intexit = MsgBox("do you want to exit?", vbYesNo + vbExclamation, "exit of program")
If intexit = vbYes Then
Unload Me
Else
frmtimer.Show
End If
End Sub

Private Sub cmdreset_Click()
Dim intanswer As Integer
intanswer = MsgBox("do you want to reset clock?", vbYesNo + vbQuestion, "reset clock")
If intanswer = vbYes Then intsecond = 0
End Sub

Private Sub cmdstop_Click()
tmrclock.Enabled = False
End Sub

Private Sub cmmdstart_Click()
tmrclock.Enabled = True

End Sub

Private Sub tmrclock_Timer()
intsecond = intsecond + 1
If intsecond = 10 Then intsecond = 0 Or intminute = intminute + 1
lblminute.Caption = intminute
lblsecond.Caption = intsecond
End Sub
این برنامه است

[javadt]

بیا دوست عزیز
برات کاملش رو نوشتم
دانلود کن

http://rapidshare.com/files/246934821/timer.zip.html

[computer2000]

سلام

خیلی ممنون از کمکتون واقعا جامع بود فقط میتونم در مورد بعضی از قسمتها راهنمایی کنید