N
Nick I
I am at the hobby stage at the moment. Trying to figure out what is possible
when embedding the visio drawing control inside a VBA application.
I am using visio pro 2007 and VB Express 2008.
I was hoping to find some tutorials, sample code, etc on how to do this. I
figured out how to get the drawing control inside a VBA form. I got some
basics down on controling what happens when it loads:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As_
System.EventArgs) Handles MyBase.Load
Dim visioWindow As Microsoft.Office.Interop.Visio.Window
Dim visioDocument As Microsoft.Office.Interop.Visio.Document
visioWindow = AxDrawingControl1.Window
visioDocument = AxDrawingControl1.Document
visioWindow.ShowGrid = False
visioWindow.ShowPageTabs = False
visioWindow.ShowRulers = False
visioWindow.ShowScrollBars = True
AxDrawingControl1.NegotiateToolbars = True
AxDrawingControl1.NegotiateMenus = True
visioDocument.OpenStencilWindow()
End Sub
But I want to be able to load particular files, stencils, to create some
form elements to manipulate shapes when the user right clicks a visio shape,
etc... Anyone have more tutorials I could use. I got this far by taking
advantage of the auto-complete within SB express... a slow painful process.
Would love to have apointer to a well documented object-module with tutorial.
Thanks,
-Nick
when embedding the visio drawing control inside a VBA application.
I am using visio pro 2007 and VB Express 2008.
I was hoping to find some tutorials, sample code, etc on how to do this. I
figured out how to get the drawing control inside a VBA form. I got some
basics down on controling what happens when it loads:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As_
System.EventArgs) Handles MyBase.Load
Dim visioWindow As Microsoft.Office.Interop.Visio.Window
Dim visioDocument As Microsoft.Office.Interop.Visio.Document
visioWindow = AxDrawingControl1.Window
visioDocument = AxDrawingControl1.Document
visioWindow.ShowGrid = False
visioWindow.ShowPageTabs = False
visioWindow.ShowRulers = False
visioWindow.ShowScrollBars = True
AxDrawingControl1.NegotiateToolbars = True
AxDrawingControl1.NegotiateMenus = True
visioDocument.OpenStencilWindow()
End Sub
But I want to be able to load particular files, stencils, to create some
form elements to manipulate shapes when the user right clicks a visio shape,
etc... Anyone have more tutorials I could use. I got this far by taking
advantage of the auto-complete within SB express... a slow painful process.
Would love to have apointer to a well documented object-module with tutorial.
Thanks,
-Nick