WD: WordBasic Examples: ViewToolbars

• Microsoft Word for Windows, versions 6.0, 6.0a, 6.0c
• Microsoft Word for Windows 95, version 7.0
• Word for the Macintosh, versions 6.0, 6.0.1

SUMMARY

This article contains a sample macro that demonstrates the use of the following WordBasic statements and functions:

   ViewToolbars
   ViewBorderToolbar
   ViewDrawingToolbar

MORE INFORMATION

ViewToolbars

Syntax:

ViewToolbars [.Toolbar = text] [, .Context = number] [, .ColorButtons = number] [, .LargeButtons = number] [, .ToolTips = number] [, .Reset] [, .Delete] [, .Show] [, .Hide]

Example:

The following sample macro prompts the user for a toolbar to view. After the toolbar is displayed, the macro asks the user if the toolbar should then be hidden. Run the macro and type "Microsoft" (without the quotation marks).

 Sub MAIN
  On Error Goto done
  name$ = InputBox$("What is the name of the toolbar you would \
   like displayed?")
  ViewToolbars .Toolbar = name$, .Show
  n = MsgBox("Would you like to hide the " + name$ + " toolbar?", 35)
  Select Case n
   Case - 1
    ViewToolbars .Toolbar = name$, .Hide
   Case Else
  End Select
  done:
 End Sub

• ViewBorderToolbar
• ViewDrawingToolbar

ViewBorderToolbar

Example:

 Sub Main
  MsgBox "Choose OK to toggle the Border Toolbar on or off."
  ViewBorderToolbar
 End Sub

ViewDrawingToolbar

Example:

 Sub Main
  MsgBox "Choose OK to toggle the Drawing Toolbar on or off."
  ViewDrawingToolbar
 End Sub