[编程申请]：紧急求助

tyh_1967

我是刚学习用VB进行solidworks二次开发的菜鸟，有个问题请不啬指教：我编了以下一段程序，但不运行，也无错误提示，请问是何故？如和解决？
Dim swApp as Object
Dim npart as Object
set swapp=createobject("sldworks.application")
set npart=swApp.newpart()
本人试图用上述程序打开一新的solidworks会话，以新建一solidworks文件。

efan2000

set swapp=createobject("sldworks.application")
检查CreateObject后面的参数是否正确。
可以先在“工程”——“引用”中引用类型库，然后在对象浏览器中查看它的库名称。一般的形式是“库名称.Application"。
之后，跟踪CreateObject是否正常创建对象，如果发生错误，也可能该应用程序不支持这种方式的调用。

秋枫

也许有可能这个ActiveX对像是隐藏的。你试试这个对像有没有Visible属性。
set swapp=createobject("sldworks.application")
加一句 swapp.visible = true
试试看呢。。。
我没有用过sw，但AutoCAD有时是这样的。