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: MappingMapquest in Category Geospatial Mapping : Mapping from Total Visual SourceBook

Use MapQuest ( to show addresses and driving directions in VBA and VB6

Procedure List

Procedure Name



(Declarations) Declarations Declarations and private variables for the modMappingMapquest module
MapAddress_Mapquest Procedure Open the specified address location in Mapquest maps ( Pass a blank string to open with no address.
MapDirections_Mapquest Procedure Open Mapquest maps ( with directions from one location to another
MapQuestLocationToString Procedure Accept location parameters, and builds a location string suitable for passing to mapping sites. All parameters are optional.
LaunchURL Procedure Open the default Internet browser on the user's machine by specifying a URL (uniform resource locator)

Example Code for Using Module: MappingMapquest

' Example of modMappingMapquest
' 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_Mapquest()
  ' Comments: Examples of using the modMappingMapquest module to open Mapquest to specific addresses and generate directions in VBA and VB6.
  '           This procedure opens several instances of Mapquest in your web browser.

  Const cstrWhiteHouse As String = "1600 Pennsylvania Ave NW, Washington, DC 20500"
  Dim strAddress As String

  ' Create an address string from its parts
  strAddress = MapQuestLocationToString("8150 Leesburg Pike", "Vienna", "VA", "22182")

  ' Open MapQuest to an address
  MapAddress_Mapquest strAddress

  ' Open MapQuest with directions between two locations
  MapDirections_Mapquest strAddress, cstrWhiteHouse

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