Total Visual SourceBook

Total Visual SourceBook CD and Printed Manual

Microsoft Access/ Office 2016, 2013, 2010, and 2007 Version
is Shipping!

New features in Total Visual SourceBook for Access, Office 2007 and VB6

Supports Access/Office 2016, 2013, 2010 and 2007, and Visual Basic 6.0!

Separate version for Access/Office 2003, 2002, and 2000.

Separate version for:
Access 97/95


View all FMS products for Microsoft AccessAll Our Microsoft Access Products

SourceBook Info:

Why SourceBook?

 

"The code is exactly how I would like to write code and the algorithms used are very efficient and well-documented."

Van T. Dinh, Microsoft MVP

 

 

 

Microsoft Access, Office/VBA, VB6 Modules royalty-free source code libraryMicrosoft Access Modules royalty-free source code libraryMicrosoft Access VBA and VB6 Module Library Free trial of Total Visual SourceBook for Microsoft Access, Office, VB6 and VBA

Module: Waiting in Category General VBA/VB6 : Date and Time from Total Visual SourceBook

Wait for a period of time or until a particular time using VBA and VB6.

Uses the Windows API Sleep command to avoid the DoEvents command in a loop that eats up all your CPUs. Includes support for 32 and 64 bit API calls. For more information, read our paper http://www.fmsinc.com/microsoftaccess/modules/examples/avoiddoevents.asp

Procedure List

Procedure Name

Type

Description

(Declarations) Declarations Declarations and private variables for the modWaiting module
WaitForTime Procedure Waits until the specified date and time
WaitSeconds Procedure Waits for a specified number of seconds

Example Code for Using Module: Waiting

' Example of modWaiting
'
' To use this example, create a new module and paste this code into it.
' Then run the procedure by putting the cursor in the procedure and pressing:
'    F5 to run it, or
'    F8 to step through it line-by-line (see the Debug menu for more options)

Private Sub Example_modWaiting()
  ' Comments: Examples of the modWaiting module to wait for a period of time or for a particular time in VBA and VB6.

  Debug.Print "Waiting for 2 seconds..." & Now
  WaitSeconds 2
  Debug.Print "... done at " & Now
  Debug.Print

  Debug.Print "Waiting from " & Now & " until " & Now + 0.00003 & "..."
  WaitForTime (Now + 0.00003)
  Debug.Print "... done at " & Now

End Sub

Microsoft Access Module LibraryOverview of Total Visual SourceBook

The source code in Total Visual SourceBook includes modules and classes for Microsoft Access, Visual Basic 6 (VB6), and Visual Basic for Applications (VBA) developers. Easily add this professionally written, tested, and documented royalty-free code into your applications to simplify your application development efforts.

Additional Resources