Dim simdikidakika, istenendakika As Integer Private Sub Form_Load simdikidakika = Minute End Sub Private Sub Timer1_Timer istenendakika = 1 If 58 < simdikidakika + istenendakika Then simdikidakika = 1 End If If Minute = simdikidakika + istenendakika Then MsgBox istenendakika & " dakika doldu" simdikidakika = Minute End If End Sub Timeri 1 dakikadan fazla kullanmak için Lazım olur belki

yeniler için güzel eline sağlık. A man may be born, but in order to be born he must first die, and in order to die he must first awake.