0328500091
Industrial
- Feb 26, 2004
- 9
Hi, how delete a selection in VB please, I try this but it's not OK:
Language="VBSCRIPT"
Sub CATMain()
Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument
Dim product1 As Product
Set product1 = productDocument1.Product
product1.ApplyWorkMode VISUALIZATION_MODE
Dim selection1 As Selection
Set selection1 = productDocument1.Selection
selection1.Search "CATAsmSearch.MfConstraint,all"
productDocument1.Remove selection1
End Sub
Thanks
Dom
Language="VBSCRIPT"
Sub CATMain()
Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument
Dim product1 As Product
Set product1 = productDocument1.Product
product1.ApplyWorkMode VISUALIZATION_MODE
Dim selection1 As Selection
Set selection1 = productDocument1.Selection
selection1.Search "CATAsmSearch.MfConstraint,all"
productDocument1.Remove selection1
End Sub
Thanks
Dom