VB.NET CAD扩展数据问题

maomao_zhen · 发表于 2008-12-24 17:35:00

daType3(0) = 1001 : data4(0) = "SOUTH"
daType3(1) = 1000 : data4(1) = "190009"
szobj.SetXData(daType3, data4) ''''就是在这里出错的!!
为什么同样的代码在CAD的VBA环境里面就可以成功运行,而在VB.NET环境下就出现错误?
CAD的版本是2002的

dxfi0qstf1h.jpg

xwjljh · 发表于 2009-1-10 23:56:00

我也遇到类似的问题，怎么解决呀
望高手相助

xwjljh · 发表于 2009-2-7 12:49:00

怎么没有人帮忙呀？
楼主问题解决了吗？
可否分享，谢谢

houlinbo · 发表于 2009-2-10 14:58:00

/// 向实体中写扩展数据
   public void WriteXData(AcadEntity  ent, String appName, String xValue)
   {
         try
         {
            short[] dataType = new short[2]; Object[] data = new Object[2];
            dataType[0] = 1001; data[0] = appName;
            dataType[1] = 1000; data[1] = xValue;
            ent.SetXData(dataType, data);
         }
         catch { }
   }