QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
10天前
查看: 5302|回复: 6
收起左侧

[求助] 怎么用VBA求直线和圆的倒圆角呢?

[复制链接]
发表于 2011-12-10 08:49:11 | 显示全部楼层 |阅读模式 来自: 中国河南鹤壁

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
这是高手给我的两个直线的倒圆角的做法:
& S5 f# d! u/ [  B* @) b几何法:$ j* h9 T2 J5 H- h2 _7 g# A" E
& ?8 R9 V8 Z6 _! e( U+ Q5 o
先获得两条直线与X轴的夹角A1和A2
- _3 D& C4 j6 K! G- s& ?5 c再获得两条直线的交点P0
. O9 v* F# \+ _7 F+ O* {" P已知圆角半径R
6 \* ?  X- @. P6 ], P+ @- y' I* j用三角函数sin和cos求出直线和圆角的弧的交点(切点)坐标P1和P2
" ~; k# V# Q  K% }. D! x再修改两条直线的端点座标为P1和P2
9 G& L1 _0 o- ^' E8 Q再画圆弧  N7 |6 _7 ^% |5 B

' o. b' P4 V! z- }& X$ a
; g- u" I' f: L6 n我现在要求一个直线和圆(两者交叉)的倒圆角,求指点!
发表于 2011-12-10 22:01:50 | 显示全部楼层 来自: 中国辽宁
假如CAD没有圆角命令,你会用什么方法画出来呢?
 楼主| 发表于 2011-12-22 14:57:03 | 显示全部楼层 来自: 中国河南鹤壁
2# woaishuijia " q# C- ?4 E: `5 Y: M
不好意思,我不知道,能讲吗?
: p8 n& q2 @# ~0 Y1 X我想也许你可以用命令画出来,然后再用Sendcommand发送命令,我现在最关键的问题是,不知道如何发送命令选择对象,比如用命令选择用VBA画出的圆circle1和直线Line2,请赐教!
 楼主| 发表于 2011-12-22 15:23:08 | 显示全部楼层 来自: 中国河南鹤壁
http://bbs.mjtd.com/thread-64071-1-1.html
0 x2 x, A+ T- c: W# X这个我一直不太懂!
发表于 2011-12-22 18:14:33 | 显示全部楼层 来自: 中国陕西西安
期待高手解答,以前用别的软件做三维,现在学着用cad做,
发表于 2011-12-22 21:30:32 | 显示全部楼层 来自: 中国辽宁
3# 14373 / ^/ H+ {$ Y) c% e2 i+ c
这是基本的几何作图啊* A3 T3 [8 G5 ?3 z
以圆角半径为偏移距离分别偏移已知圆和直线,得到辅助圆和辅助直线,其交点即为圆角弧的圆心.以此点为圆心,以圆角半径为半径画第二个辅助圆,其与已知圆和已知直线的交点(其实是切点)即为圆角弧的起点和端点.画好圆角弧后删除辅助直线和两个辅助圆即可.
0 H. r, [. }4 S7 n; H. U) v; {按不同的偏移方向,最多可能得到8个圆角弧的圆心,具体哪个合适,要根据具体情况判断.+ a) ?9 n! o: q
求两直线的圆角也是这个道理.
8 ]+ v% @% ?( S明经帖子中的方法是向CAD命令行发送LSP代码调用CAD的圆角命令.学会LISP就能看懂.
 楼主| 发表于 2011-12-23 08:34:37 | 显示全部楼层 来自: 中国河南鹤壁
6# woaishuijia 9 D( j" w/ ]  J: s' A" Q
哦,谢谢!
2 ~5 Q- g* G$ {3 M  M( b8 Q( h& i2 C哎!! 我一直以为可以同时选择圆和直线,然后发送倒圆角命令,所以根本没往这么曲折复杂迂回坎坷的道路上想,为什么这么常用又不复杂的命令,还要中转到最基本的求交点比大小上来呢,为什么不更新出这样的功能?是不是AutoCAD的VBA一直要停留在最原始的阶段了呢?
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表