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

VB.NET CAD扩展数据问题

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

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

<p>我也遇到类似的问题,怎么解决呀</p><p>望高手相助</p>

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

<p>怎么没有人帮忙呀?</p><p>楼主问题解决了吗?</p><p>可否分享,谢谢</p>

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

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

ntchjie 发表于 2009-2-12 15:36:00

<p>将datatype的类型设置为short看看。或许是这个原因。</p>

xwjljh 发表于 2009-4-26 22:35:00

<p>还是不行呀,请问楼主解决这个问题了吗?</p><p>可否共享一下,谢谢了</p><p>我最近也在做类似的开发工作,</p><p>希望交流</p><p>QQ:75003956</p>

zzyong00 发表于 2009-4-27 10:14:00

<p class="element">XDataType&nbsp;&nbsp;&nbsp; Variant[变体] (短整数数组);&nbsp; </p><p class="element">XData&nbsp; 变体数组; </p><p class="element">你把daType3再赋给一个变体试试</p>

xwjljh 发表于 2009-4-27 15:39:00

<p>Variant在VB.NET下是object</p><p>不行</p><p>郁闷</p><p></p>

xwjljh 发表于 2009-4-30 14:24:00

<p>请大侠们帮帮呀</p><p>谢谢了</p>

mycad 发表于 2009-5-5 16:09:00

<p>把程序共享一下看看呢,</p>
页: [1] 2
查看完整版本: VB.NET CAD扩展数据问题