|
-
Feb 4th, 2006, 10:01 AM
#1
Thread Starter
Member
Timers in VB?
Hi everyone, in my program that I am currently making i want to use a ten second timer that appears on the screedn but that's not really the point. I am using a spreadsheet in my program which, as most of you will know, means that you use a slightly differnt version of visual basic. There is a not a timer listed on the toolbox and when i right click and go to additional controls there are so many i cant seem to find it there either.
can someone help?
Thanks
-
Feb 4th, 2006, 01:43 PM
#2
Re: Timers in VB?
In Excel VBA there is no timer control for the toolbox but there is a built in timer function that is similar.
Timer
Returns a Single representing the number of seconds elapsed since midnight.
Code:
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
VB/Office Guru™ (AKA: Gangsta Yoda™ ®)
I dont answer coding questions via PM. Please post a thread in the appropriate forum. 
Microsoft MVP 2006-2011
Office Development FAQ (C#, VB.NET, VB 6, VBA)
Senior Jedi Software Engineer MCP (VB 6 & .NET), BSEE, CET
If a post has helped you then Please Rate it! 
• Reps & Rating Posts • VS.NET on Vista • Multiple .NET Framework Versions • Office Primary Interop Assemblies • VB/Office Guru™ Word SpellChecker™.NET • VB/Office Guru™ Word SpellChecker™ VB6 • VB.NET Attributes Ex. • Outlook Global Address List • API Viewer utility • .NET API Viewer Utility •
System: Intel i7 6850K, Geforce GTX1060, Samsung M.2 1 TB & SATA 500 GB, 32 GBs DDR4 3300 Quad Channel RAM, 2 Viewsonic 24" LCDs, Windows 10, Office 2016, VS 2019, VB6 SP6 
-
Feb 5th, 2006, 05:43 AM
#3
Thread Starter
Member
Re: Timers in VB?
 Originally Posted by RobDog888
In Excel VBA there is no timer control for the toolbox but there is a built in timer function that is similar.
Code:
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Thanks, but i'm still a bit lost how would i make the 10 appear on the form in a label and then count down to zero with the timer?
-
Feb 5th, 2006, 08:00 AM
#4
Frenzied Member
Re: Timers in VB?
Um, maybe update the label in the Do ... Loop?
Tengo mas preguntas que contestas
-
Feb 6th, 2006, 03:53 AM
#5
Re: Timers in VB?
Application.OnTime Now+ TimeValue("00:00:10"), 'Call Action
-
Feb 6th, 2006, 12:31 PM
#6
Re: Timers in VB?
Depending on how you need to use the timer, both techniques will work for you.
VB/Office Guru™ (AKA: Gangsta Yoda™ ®)
I dont answer coding questions via PM. Please post a thread in the appropriate forum. 
Microsoft MVP 2006-2011
Office Development FAQ (C#, VB.NET, VB 6, VBA)
Senior Jedi Software Engineer MCP (VB 6 & .NET), BSEE, CET
If a post has helped you then Please Rate it! 
• Reps & Rating Posts • VS.NET on Vista • Multiple .NET Framework Versions • Office Primary Interop Assemblies • VB/Office Guru™ Word SpellChecker™.NET • VB/Office Guru™ Word SpellChecker™ VB6 • VB.NET Attributes Ex. • Outlook Global Address List • API Viewer utility • .NET API Viewer Utility •
System: Intel i7 6850K, Geforce GTX1060, Samsung M.2 1 TB & SATA 500 GB, 32 GBs DDR4 3300 Quad Channel RAM, 2 Viewsonic 24" LCDs, Windows 10, Office 2016, VS 2019, VB6 SP6 
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|