insert timer and text box
change textbox name as txttime
insert another form
set the interval in timer for 600
code is below
Dim a As Integer
Private Sub Form_Load()
a = Timer1.Interval
End Sub
Private Sub Timer1_Timer()
a = a - 10
txttime = a / 10
If a = 0 Then
Load Form2
Form2.Visible =...