Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.

This is how you would make custom properties but these aren't instance they are permanent(if you save)

Dim oDoc As Document
oDoc = oRow.ComponentDefinitions.Item(1).Document
oDoc.PropertySets.Item("Inventor User Defined Properties").Add(qty * 5, "PACK_QTY")

 

And for instance properties the only way I could think to do it would be..

Dim oDoc As Document
oDoc = oRow.ComponentDefinitions.Item(1).Document
For i As Integer = 1 To oRow.ItemQuantity
iProperties.InstanceValue(oDoc.DisplayName & ":" & i, "PACK_QTY") = 5
Next