assing 发表于 2006-2-10 15:46:00

如何用vb二次开发“例子.dwg”这样的图。

<P>我想用vb二次开发“例子.dwg”这样的简单规律性的图。编程的目的:当直径不同时,输入几个参数,就能很快生成类似的图。请问各位高手,这个vb二次开发程序容易编吗?麻烦介绍一下主要思路。谢谢指点!</P>
<P>注意:例子.dwg是cad2000文件。</P>

shirazbj 发表于 2006-2-12 11:04:00

<P>应该简单。</P>
<P>插入一个用户窗体,添加上输入框,输入数值,点ok后画图就是了。数值保存在变量中,传给画图过程。画图就是画线和画圆。用循环画出多条线。自己算出起终点就是了。</P>

assing 发表于 2006-2-13 09:44:00

谢谢解答!

前面的都明白。为什么要计算起始点和终点呢,这样很麻烦啊,起始点和终点太多了?这个图应该涉及到很多偏移,剪切,延长等命令,如何实现?

shirazbj 发表于 2006-2-15 06:38:00

<P>算清楚了不是就不用剪切了么</P>
<P>用三角函数算啦。知道半径,间距(y方向),求x方向不是很简单。</P>
<P>y间距一样,循环就可以画出其他的了。就用到addline的画图命令。</P>
<P>&nbsp;</P>

assing 发表于 2006-2-15 18:48:00

<P>编程量大不大?我觉得很复杂。。。。</P>

assing 发表于 2006-2-15 18:56:00

<P>只用到addline的画图命令,其他的就不用了?vba的强大作用没有体现?如何保证线的2端就在圆上,因为端点是算出来的,可能有误差阿,而通过剪切命令的不会有误差。</P>

shirazbj 发表于 2006-2-16 13:15:00

<P>编程是用来解决问题的,而不是用来显示软件的强大作用的。</P>
<P>任何东西都有误差,这误差只要在你允许的范围就可以了。这就是工程的解决办法。</P>
<P>剪切背后的代码是什么,它的误差在什么量级我不知道。</P>
<P>比如你从半圆以上画2条水平线(3等分半径),圆心在(0,0)。可以这样:</P>
<P>N=2</P>
<P>for k=1 to n</P>
<P>&nbsp;&nbsp;&nbsp;&nbsp; ThisR=1./3.*R*k</P>
<P>&nbsp;&nbsp;&nbsp;&nbsp; x1=sqrt(R*R-ThisR^2)</P>
<P>&nbsp;&nbsp;&nbsp; y1=ThisR</P>
<P>&nbsp;&nbsp;&nbsp; x2=-x1</P>
<P>&nbsp;&nbsp;&nbsp; y2=y1</P>
<P>&nbsp;&nbsp; addline(x1,y1,x2,y2)&nbsp;&nbsp; &#39;具体参照addline要求</P>
<P>Next n</P>
<P>&nbsp;</P>

assing 发表于 2006-2-16 14:18:00

你的大概意思,我明白了。非常感谢你的指点。有问题再请教。

yefeng1861 发表于 2006-2-18 17:23:00

学习

ybhfau 发表于 2006-2-23 13:01:00

<P>我想请教,我画了一个矩形,需要选择各个边,并且在选择边的同时得到各边顶点的坐标,请问如何实现?</P>
<P>多谢了!</P>
页: [1] 2
查看完整版本: 如何用vb二次开发“例子.dwg”这样的图。