【转帖】如何将acadapplication对象传递给dll中的参数acadapplication对象
 

如何将acadapplication对象传递给dll中的参数acadapplication对象
www.dimcax.com
如何将acadapplication对象传递给dll中的参数acadapplication对象
dim acadapp as autocad.acadapplication = ctype(application.acadapplication, acadapplication)
'acadapp=(acadapplication)marshal.getactiveobject("autocad.application");
'dim acadapp as new autodesk.autocad.applicationservices.application
dim dllref as new dll.xdautocadinterface

dll.structsteeldrawingcall(acadapp)
dll为以前编制的vb程序
前面三行是net中获取acadapplication的办法
dim dllref as new dll.xdautocadinterface 是创建dll的一个实例
问题出在dll.structsteeldrawingcall(acadapp)，类型转换错误
对com的数据传递机制不清楚，哪位高手指点一下