Som diagraming motstykke til Microsoft Office Suite av produkter , hjelper Visio fagfolk satt sammen visualiseringer av informasjon som organisasjoner , prosesser og diagrammer . Sette inn figurer i Visio VBA diagram er en relativt enkel og grei prosedyre at selv en nybegynner Visio bruker kan oppnå. Et diagram er ubrukelig uten de nødvendige former og visuelle representasjoner du trenger, så det er et viktig skritt for å lære . Instruksjoner
en
Start din Visio Visual Basic-redigering og åpne filen som du ønsker å sette figurer inn .
2
Skriv inn følgende linjer med kode for å kopiere kilden figurer slik at du kan sette dem inn i Visio-dokument i neste trinn : en
Me.Application.Documents.Add ( "")
Dim copyPage som Visio.Page
Dim pastePage Som Visio.Page
Dim rektangel Som Visio.Shape = Ingenting
Dim oval Som Visio.Shape = Ingenting
3
Command Visual Basic å legge figurene til den nye siden ved hjelp av følgende linjer med kode :
Dim visioPages Som Visio.Pages = Me.Application.ActiveDocument.Pages
visioPages.Add ()
4
Kopier figurene til Visio-diagram ved hjelp av Visual Basic ved å utføre følgende linjer med kode :
Prøv
copyPage = visioPages ( 1 )
rektangel = copyPage.DrawRectangle ( 1.1, 2.2, 4.5, 6.7 )
oval = copyPage.DrawOval ( 1 , 8,75 , 3,5 , 6,25 )
Catch ex As Exception
System.Windows.Forms.MessageBox.Show ( ex.Message )
End Prøv
5
Fortsett å bruke " prøve" og " End Prøv " kommandoer , med de respektive parametrene fylt i mellom de to for å sette inn flere figurer. Angi navnene på de samme som " oval " eller " rektangelet " for å endre hva slags form er satt inn i dokumentet .
