Fire Notification When Activating a Sheet Example(VB.NET)
This example shows how to fire a notification when a sheet is activated in a
drawing document.
'---------------------------------------------------------------
' Preconditions:
' 1. Open
' install_dir\samples\tutorial\advdrawings\foodprocessor.slddrw.
' 2. Run this macro (press F5).
'
' Postconditions:A message box informs you that a sheet is about to be
' activated. Click OK to close the message box.
'
' NOTE: The IDrawingDoc ActivateSheetPostNotify event only fires
' when a sheet is interactively activated in SolidWorks; this event
' does not fire when a sheet is activated through the API.
'---------------------------------------------------------------
Imports SolidWorks.Interop.sldworks
Imports SolidWorks.Interop.swconst
Imports System
Imports System.Windows.Forms
Imports System.Collections
Imports System.Diagnostics
Partial Class SolidWorksMacro
Public WithEvents swDrawingDoc As DrawingDoc
Dim swModel As ModelDoc2
Dim status As Boolean
Sub Main()
swModel = swApp.ActiveDoc
'Set up events
swDrawingDoc = swModel
AttachEventHandlers()
' Activate Sheet 4
status = swDrawingDoc.ActivateSheet("Sheet4")
End Sub
Sub AttachEventHandlers()
AttachSWEvents()
End Sub
Sub AttachSWEvents()
AddHandler swDrawingDoc.ActivateSheetPreNotify, AddressOf Me.swDraw_ActivateSheetPreNotify
End Sub
Function swDraw_ActivateSheetPreNotify(ByVal SheetName As String) As Integer
Debug.Print("A sheet is about to be activated.")
MsgBox("A sheet is about to be activated.")
End Function
''' <summary>
''' The SldWorks swApp variable is pre-assigned for you.
''' </summary>
Public swApp As SldWorks
End Class