Hides the Magnifying Glass tool.
.NET Syntax
| Visual Basic (Declaration) | |
|---|
Sub HideMagnifyingGlass() |
| Visual Basic (Usage) | |
|---|
Dim instance As IModelView
instance.HideMagnifyingGlass() |
| C# | |
|---|
void HideMagnifyingGlass() |
| C++/CLI | |
|---|
void HideMagnifyingGlass(); |
Example
Visual Basic for Applications (VBA)
'----------------------------------------
'
' Preconditions: Model document is open.
'
' Postconditions: None
'
'----------------------------------------
Option Explicit
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swModelView As SldWorks.ModelView
Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set swModelView = swModel.ActiveView
swModelView.ShowMagnifyingGlass -0.01928933522023, 0.004431675106825, -0.001816629754713, 2, True, True
swModelView.MoveMagnifyingGlass -0.01928933522023, 0.004431675106825, -0.004
swModelView.MoveMagnifyingGlass -0.01928933522023, 0.004431675106825, -0.016
swModelView.HideMagnifyingGlass
End Sub
See Also
Availability
SOLIDWORKS 2009 FCS, Revision Number 17.0