Io ho provato a fare così ho aggiunrto questo--------->!!!
Private Sub Timer1_Timer()
Label1.caption=Format(Now,"hh:mm:ss")
End Sub
Nel Form_Load()
Label1.caption=Format(Now,"hh:mm:ss")
Timer1.Intrval=1 ----->
End Sub
Io ho provato a fare così ho aggiunrto questo--------->!!!
Private Sub Timer1_Timer()
Label1.caption=Format(Now,"hh:mm:ss")
End Sub
Nel Form_Load()
Label1.caption=Format(Now,"hh:mm:ss")
Timer1.Intrval=1 ----->
End Sub
Timer1.Intrval = 1000 non = 1. il timer va a millisecondi.
se ti funziona ok. io la proprietà interval l'ho impostata direttamente nella finestra di progettazione e non via codice.
![]()
05.08.2005 - by alka
Auguri all'angelo custode dei moderatori.
Cliccando sul bottone inizia vorrei bloccare il timer, sai che proprietà devo impostare?
Private Sub cmdInizia_Click()
End Sub
si basta che gli imposti interval = 0
codice:Private Sub cmdInizia_Click() Timer2.Interval = 0 End Sub
05.08.2005 - by alka
Auguri all'angelo custode dei moderatori.
Private Sub cmdInizia_Click()
lblDataInizio.Caption = CStr(lblTimeI)
End Sub
Ho fatto così!!!
Grazie
prego, non c'è di che.
![]()
![]()
![]()
05.08.2005 - by alka
Auguri all'angelo custode dei moderatori.