cbse_smy 发表于 2005-9-6 14:58:00

VLAX类的应用

<P>在调用VLAX类（明经提供）时总是出错，并且引用了Visual Lisp ActiveX Model类，下面语句无法执行：</P>
<P>Set VL = ThisDrawing.Application.GetInterfaceObject("VL.Application.16")</P>
<P>提示是无法加载！</P>
<P>请高手相助！我在2004、2005中均试而且用GetInterfaceObject加载其它模块也不行！</P>

翔羽 发表于 2005-9-7 08:52:00

我也是同样的问题，请教大家了~~

翔羽 发表于 2005-9-7 16:35:00

我用的是Autocad2002,我在工程中引用了visual lisp module class，但是在执行Set VL = ThisDrawing.Application.GetInterfaceObject("VL.Application.1")的时候始终报错，请问怎么解决？

sharksun 发表于 2005-9-7 16:54:00

<P>论坛里有答案，自己搜索。</P>

cbse_smy 发表于 2005-9-16 18:43:00

<P>在调用VLAX类（明经提供）时总是出错，并且引用了Visual Lisp ActiveX Model类，下面语句无法执行：</P>
<P>Set VL = ThisDrawing.Application.GetInterfaceObject("VL.Application.16")</P>
<P>提示是无法加载！</P>
<P>请高手相助！我在2004、2005中均试而且用GetInterfaceObject加载其它模块也不行！</P>

lenovo1 发表于 2005-9-21 10:45:00

路过。

MJTD_7777 发表于 2005-9-21 10:54:00

<P>我们家的是2002，用下面的语句通过</P>
<P>Dim Vl<BR>Set Vl = ThisDrawing.Application.GetInterfaceObject("VL.Application.1")</P>
<P>如果你的不行可以做下述尝试</P>
<P>在你注册表HKEY_CLASSES_ROOT\CLSID中找 “VL.Application”</P>
<P>一般GEtobject后的内容都在这里，GetInterfaceObject也同样。</P>
<P>如果找到的话，ProgID中的内容就是你要填入GetInterfaceObject的内容。</P>
<P>祝你成功！！</P>

songzhi 发表于 2005-9-21 22:09:00

<P>简单点说就是执行一下"vl-load-com".</P>
<P>你可以：</P>
<P>把"(vl-load-com)"加入acad200x.lsp</P>
<P>或</P>
<P>在命令下执行"(vl-load-com)"</P>
<P>或</P>
<P>在VBA里加入sendcommand "(vl-load-com)" &amp; vbcr</P>
<P>以上都是在论坛里搜到的。</P>

cbse_smy 发表于 2005-9-26 14:22:00

<P>第八楼的说法好像不灵，我试了N次，无任何效果，但是在下在此谢谢每一位朋友！</P>
<P>第七楼的说法是挺灵的，我试了一下还好</P>

songzhi 发表于 2005-9-26 20:32:00

我当时和你遇到的是相同的问题，也就是按照我所说的方法解决的。到你那儿不灵了？怪事情。看来还得多学习的
页: [1]
查看完整版本: VLAX类的应用