---

Hallo

Wie kann ich berechnete Werte aus einem VB-Programm
(VB - Inventor oder selbstständiges VB-Net-Programm)

ins Fenster 'Parameter' zu einem vorhandenen
Modellparameter in die Spalte Gleichungen erstellen ????

zb. der Modellparameter  , bekommt in der Spalte Gleichungen den Wert 100 mm

Benutze Windows 7 , 64 Bit , Inventor 2010 ,Sp1

MFG
aus Bochum

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

Nix ins Parameterfenster, wir schreiben direkt über die API.

Code:

---

Option Explicit

Private Sub Parameters()

Dim oDoc As Document
Set oDoc = ThisApplication.ActiveDocument

Dim oParam As Parameter

For Each oParam In oDoc.ComponentDefinition.Parameters
    If oParam.Name = "NamedesParameters" Then
        oParam.Value = 100 'oder deinen berechneten Wert
    End If
Next

End Sub

---

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP