矩形为啥Dim rec1 as acadrectang,CAD直接画图命令不就是Rectang吗
是上面补充的命令无法编译。。。
本人小白一个请教大虾呀，VB调用CAD画图，比如矩形是啥命令，为什么线条可以Dim line1 as acadline,矩形?
答案:1 悬赏:30 手机版
解决时间 2021-04-12 09:13
- 提问者网友：抽煙菂渘情少年
- 2021-04-11 11:43
最佳答案
- 五星知识达人网友：佘樂
- 2021-04-11 13:22
cad 程序里没有acadrectang这个实体名称
用sendcommand的方法
object.SendCommand "Rectang " & x1 "," & y1 " " & x1 "," & y1 " "
或者先定义四个点用多线段的方法画,s是四个坐标点
dim s(0 to 7) as double
Dim lwp As AcadLWPolyline
set lwp=object.AddLightWeightPolyline(s)
用sendcommand的方法
object.SendCommand "Rectang " & x1 "," & y1 " " & x1 "," & y1 " "
或者先定义四个点用多线段的方法画,s是四个坐标点
dim s(0 to 7) as double
Dim lwp As AcadLWPolyline
set lwp=object.AddLightWeightPolyline(s)
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯