web development India freelance website designer
Asumes: Set the Timer1.Interval in Propertie's To: 60000 and set it to False
1 Add 1 command Button[Command1]
2 Add 1 Label [ Label1 ]
3 Add 1 Timer [ Timer1 ]


Private Sub Command1_Click()
Timer1.Enabled = True
End Sub


Private Sub Timer1_Timer()
Dim Interval As String
Dim MyTiC
MyTiC = Time
Label1.Caption = MyTiC
Refresh


If Label1.Caption = MyTiC Then
MsgBox " 1 minute has passed", vbOKOnly
Timer1.Enabled = False
End If
End Sub
 Simple Countdown Timer

1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593

Freelance ASP PHP web development | Web developer India Web development India| Prayagasoft - web designer India, Ecommerce developer india, Ecommerce design