Come la controparte diagraming al Microsoft Office suite di prodotti , Visio aiuta i professionisti messi insieme visualizzazioni di informazioni quali organizzazioni , processi e diagrammi . Inserimento di forme nel vostro diagramma di Visio VBA è una procedura relativamente semplice e lineare che anche un utente alle prime armi Visio può compiere. Un diagramma è inutile senza le forme necessarie e le rappresentazioni visive necessarie , quindi è un passo importante per imparare . Istruzioni
1

avviare l'editor di Visual Basic Visio e aprire il file che si desidera inserire nelle forme .
2

Tipo le seguenti righe di codice per copiare le forme di origine in modo che è possibile inserire nel documento di Visio nella fase successiva :

Me.Application.Documents.Add ( " " ) per

Dim copypage Come Visio.Page

dim pastePage Come Visio.Page

dim rettangolo come Visio.Shape = Nothing

dim ovale Come Visio.Shape = Nothing
3

comando di Visual Basic per aggiungere le forme per la nuova pagina utilizzando i seguenti righe di codice: Dim

visioPages As Visio.Pages = Me.Application.ActiveDocument.Pages

visioPages.Add ()

4

copiare le forme al diagramma di Visio utilizzando Visual Basic, eseguendo le seguenti righe di codice:

Prova

copypage = visioPages ( 1 ) per

rettangolo = copyPage.DrawRectangle ( 1.1, 2.2 , 4.5 , 6.7 ) per

ovale copyPage.DrawOval = ( 1 , 8.75 , 3.5 , 6.25 ) per

Catch ex As Exception

System.Windows.Forms.MessageBox.Show ( ex.Message ) per

End Try
5

continuare ad utilizzare la " Prova " e " End Try " comandi , con i rispettivi parametri di riempito tra i due in modo da inserire forme aggiuntive. Specificare il nome dello stesso , come "ovale " o " rettangolo " per cambiare il tipo di forma è inserito nel documento .