Hi Guys, 

pls help me to take a look.as the topic mentioned, it just get the formula of the property linkto to a material feature.  Many thanks 

below is the soruce code. and attached the sample part.

Public Sub Test()

'DocumentMgr
Dim swDMmgr As SwDocumentMgr.SwDMApplication
Dim swDMLicKey As String
Dim objClassFact As SwDocumentMgr.SwDMClassFactory
Dim nRetVal As SwDocumentMgr.SwDmDocumentOpenError
Dim