如何用vb二次开发“例子.dwg”这样的图。
<P>我想用vb二次开发“例子.dwg”这样的简单规律性的图。编程的目的:当直径不同时,输入几个参数,就能很快生成类似的图。请问各位高手,这个vb二次开发程序容易编吗?麻烦介绍一下主要思路。谢谢指点!</P><P>注意:例子.dwg是cad2000文件。</P> <P>应该简单。</P>
<P>插入一个用户窗体,添加上输入框,输入数值,点ok后画图就是了。数值保存在变量中,传给画图过程。画图就是画线和画圆。用循环画出多条线。自己算出起终点就是了。</P>
谢谢解答!
前面的都明白。为什么要计算起始点和终点呢,这样很麻烦啊,起始点和终点太多了?这个图应该涉及到很多偏移,剪切,延长等命令,如何实现? <P>算清楚了不是就不用剪切了么</P><P>用三角函数算啦。知道半径,间距(y方向),求x方向不是很简单。</P>
<P>y间距一样,循环就可以画出其他的了。就用到addline的画图命令。</P>
<P> </P> <P>编程量大不大?我觉得很复杂。。。。</P> <P>只用到addline的画图命令,其他的就不用了?vba的强大作用没有体现?如何保证线的2端就在圆上,因为端点是算出来的,可能有误差阿,而通过剪切命令的不会有误差。</P> <P>编程是用来解决问题的,而不是用来显示软件的强大作用的。</P>
<P>任何东西都有误差,这误差只要在你允许的范围就可以了。这就是工程的解决办法。</P>
<P>剪切背后的代码是什么,它的误差在什么量级我不知道。</P>
<P>比如你从半圆以上画2条水平线(3等分半径),圆心在(0,0)。可以这样:</P>
<P>N=2</P>
<P>for k=1 to n</P>
<P> ThisR=1./3.*R*k</P>
<P> x1=sqrt(R*R-ThisR^2)</P>
<P> y1=ThisR</P>
<P> x2=-x1</P>
<P> y2=y1</P>
<P> addline(x1,y1,x2,y2) '具体参照addline要求</P>
<P>Next n</P>
<P> </P> 你的大概意思,我明白了。非常感谢你的指点。有问题再请教。 学习 <P>我想请教,我画了一个矩形,需要选择各个边,并且在选择边的同时得到各边顶点的坐标,请问如何实现?</P>
<P>多谢了!</P>
页:
[1]
2