Arial
Times New Roman
Monotype Sorts
Wingdings
Symbol
Letter
DINU"
Display
LLD@
Outline map of the United States of America.
ed States of America to your drawing.
Outline map of Virginia.
line map of Virginia to your drawing.
Shape.hlp!#7300 `9Copyright © 1997 Visio Corporation. All rights reserved.
Arrange To Page `KArrange selected shapes to their correct positions, relative to each other. region.exe
Arrange To Shape... `QArrange selected shapes to their correct positions, relative to a specific shape. region.exe
Outline map of Delaware.
line map of Delaware to your drawing.
Outline map of Maryland & Washington D.C.
and to your drawing.
`O 1.55243789323705E-02| 1.54941721875177E-02| 6.57951932768814| 2.73890788109636
map outline
counties
gouge
gough
gouch
gooch
Page-1
Black fill
White fill
Blue fill
Red fill
Green fill
Cyan fill
Yellow fill
Magenta fill
Gray fill
10% Gray fill
White line
30% Gray fill
Long dashed line
Blue dark fill
Cyan dark fill
Green dark fill
Magenta dark fill
Red dark fill
Yellow dark fill
50% Gray fill
70% Gray fill
90% Gray fill
1pxl line
3pxl line
9pxl line
Hairline
Short dashed line
Arial centered
Arial top left
Arial top
Times centered
Times top
Times top left
United States of America
ArrangeData
Guide
Border
Land
Virginia
Delaware
Maryland
Washington D.C.
Gesture Format
Geograph
ic_Maps
9std
ole>
\WINDOWS
\SYSTEM\
STDOLE2.
TLB#
tomation#
Forms>
DD452EE1
608C4D0B
Dystem
DLL#Micr@osoft
] Object
Library
F6A-FA91
OP \VBE\
ThisDocu
mentG
Sub AddM
enuItem(0)
Di m vis
tsObj As
Visio.
untA/Inte
Karia
SarW
strP(ath
*UIo
aUI@?Tec
iA!c
;b@NoTool
umber of"
to be ad
'Loc
alizeBeg
F= Ar
ray("Bui
ld R
Check if
is in
If AI
.InPl
|T|he f
f us@"
has appl"i
ra cBp U
I fi
%0the
x a`nd/ora
hata
spec`ific
Is Noth
#eHD
,UI.vs>u
exis
'Grab
Dele
ewly c
Kill
lear
H If
set
Hwindo
w co
txt- (Dra0
sAtID(
from
bar5V
Xit doe@s not
%Nex
To V
mini h
elp`
Run " &
AddOn"
Csepaxrat
A6, xY
e Sub Do
cument_
Created(
ByVal do
c As Vis io.IV
MenuItem
B0Priv
enBg
Number of menu items to be added
LocalizeBegin
Build Regio&n
Build Region.exeD
LocalizeEnd
Check if Document is in place
This checks if user has applied a custom UI file to the template and/or if a custom UI that is specific to Visio has been applied.
Check if there are file custom menus
Check if there are Visio custom menus
Use the Built-in menus
use the Visio custom menus
save to a file
\custUI.vsu
Set the existing custom UI for the document
Grab this document's UI object
Delete the newly created temp file
Use the file custom menus
Create menuset object for specified window context- (Drawing window menus)
Get the "Tools" menu from the Active Toolbar & if it does not exist, add it for this document.
&Tools
Visio
Win16
Win32
VBA6
Geographic_Maps&'
stdole
MSFormsC
ThisDocument<
_Evaluate
AddMenuItem
visMenuSetsObj
MenuSetsM
visMenuSetObj
MenuSet
visMenusObj
Menus!L
visMenuObj|
Menu
visMenuItemObjZ
MenuItemj
iItemCount
visMenuItemSep3
iMnuItems\>
varMenuItemCaption
varWizardNameW
strPathl
visUIobj3
UIObject
iMenucount
bNoTools
InPlace7
CustomMenus
Application
BuiltInMenus
Path2
SaveToFile
CustomMenusFile
ClearCustomMenusW
ItemAtID
visUIObjSetDrawing
Count0v
Item
Caption
MenuOK
AddAtCw
MenuItems
MiniHelp
AddOnName
SetCustomMenusl@
Document_DocumentCreatedQ
IVDocument
Document_DocumentOpened
ID="{23BA572C-5727-11D0-9294-0020AFA3651B}"
Document=ThisDocument/&H00000000
Name="Geographic_Maps"
HelpContextID="0"
VersionCompatible32="393222000"
CMG="5F5DCC014C033907390739073907"
DPB="5052C3E4C4E4C4E4"
GC="4143D2D7D3D7D328"
[Host Extender Info]
&H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000
[Workspace]
ThisDocument=66, 66, 487, 372, Z
ThisDocument
Add menu items in menu
Set the caption and mini help text
Run
set the name of addon to run
Add the separator bar to menu(if Tools menu exists) after added Menu items.
Set the new custom UI for the document
Attribut
e VB_Nam
e = "Thi
sDocumen
|Global
Spac
dCreat
Pred
ecla
BExpo
Templ
ateDeriv
Bustomi
2Optio
/licit`
file <gouge 050104.vsd>
DRAFT -- there's much more to add
compiled from many sources by Les Young 732-780-3027
Copyright 1999-2004
content current 1 Jan 2002
"Arial