Hej,
I wan to create macro (vb.net) to turn on "Enable Hybrid Design In body", I tryied different approaches but I failed.
First my macro checks if "Enable hybrid design inside part bodies and bodies" is on, then I would like to turn on "In a body"
Dim SettingsConstrolers As...
Hej,
I am trying to determine if Constraint (Length or Offset) is horizontal or vertical. If dimension is related to line there is no problem but if it's not I cant manage with it. Could you give me some tips?
Respect
Santa123
Hi,
I created relation:
Dim MassString As String
MassString = "volume(Extract_For_Volume_Measure\Extract.1 )*7860 * 1kg_m3"
MyParameterMasaForumla = MyPart.Relations.CreateFormula("FormulaMass", " ", MyProduct.UserRefProperties.Item("Mass"), MassString )
when I change my Part...
Hej,
it finally worked, but intellisense not showing me method GetDirection
Imports INFITF
Imports MECMOD
Public Class Form1
Private Sub Form_Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim CATIA As Application
Dim MyPart As Part
Try...
Hej,
I am trying to convert my macro from script to vb.net
Function FuncIsHorizontal(MyPart As Part, i) As Boolean
Dim MyDir() As Variant
Dim MyGeomElementLine As GeometricElement
Set MyGeomElementLine =...
adapt this code to your needs
Sub MyParam()
Dim MyDocument As Document
Dim myPart As Part
Dim MyParametrsSet As ParameterSet
Dim MyDirectParam As Parameters
Dim i As Integer
Set MyDocument = CATIA.ActiveDocument
Set myPart = MyDocument.Part
Set MyParametrsSet =...
Hej
Put it under CheckBox1
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
CommandButton1.Enabled = False
ElseIf CheckBox1.Value = False Then
CommandButton1.Enabled = True
End If
End Sub
Regards
Santa
I messed up a bit, it turns out that I can't run cnext.exe /regserver
I got error:
Creating registry key
HKEY_CLASSES_ROOT\.CAT3DEXPOperation_ENOVIAV5 failed
Access denied
