付费求助，高手帮忙做二维转三维

hjs1115

课题 用VBA编程实现三视图转换为立体图

 圆柱与圆柱相交，圆柱与圆锥，圆柱与球体

那位会的帮帮忙

QQ 82607180

hjs1115@163.com

jingwen888

图形数字化转换工作室

图形数字化转换工作室

 

工程图纸数字化转换工作室，拥有一批受过工程制图严格培训、经验丰富的绘图人员和具有多年工程实践经验的校审人员。绘图人员熟练地掌握AutoCAD、MicroStation、3D Studio、3D MAX等绘图软件及地理信息系统软件。

 

    工程图纸数字化转换中心有一套严格的质量保证体系，项目管理贯穿绘图生产的各个环节。为了使绘图产品精确、安全、可靠，每一项目从开始到结束都始终置于项目经理精心组织和管理之下，建立了三级校审、图纸跟踪等制度并由具有多年工程经验的高级工程师对技术问题进行指导解决。以保证所有绘图产品能达到零错误。

 

    服务范围

 

  - 图纸数字化

  - 图纸矢量化

  - 图纸扫描 A4--A0

  - 缩微胶片扫描

  - 文献录入

 

-         价格合理，保证质量。

                                                                                                联系人：张先生

　　　　　　　　　　　　　　　　　　　　　电　话：010－67685711 

　　　　　　　　　　　　　　　　　　　　　Email：zlp80009@126.com

  QQ：83387257

-          

cuseasky

cuseasky@sina.com

zhxl1998

　　　天 弛 CAD 制 图 工 作 室           
 http://www.060s.com/web/com/ZHXL/　　　　　　
  我们承接各类机械制图服务(机械或是建筑行业) 开展的业务:所有机械工装夹具,
各种机构,小型设备等设计,机械工程CAD制图、三维造型、模具设计,三维装配,
设备效果图,三维动画（用于企业的营销宣传等等）,我们均用世界顶级的软件(SOLIDWORKS, UG, PROE, CATIA ,AUTOCAD,CAXA... ...)
完全可以根据您的要求生成各种格式三维模型与平面工程图.
              我们保证在全国价格最低!!!!
  联系电话：   13596291998             QQ： 573256504
  电子邮件：   TCCAD@126.com     联 系 人：张弛

寒潮大冬瓜

【新提醒】怎么根据二维的标高画三维啊 - AutoLISP/Visual LISP 编程技术 - AutoCAD论坛 - 明经CAD社区 - Powered by Discuz!  http://bbs.mjtd.com/thread-190283-1-1.html
还有一个方法是通过改变(直线多段线)厚度来实现视觉上的三维效果

• ;ZZ41批量改变图元39厚度'e派工具箱'代码没有加载工具箱则无法运行实现
• (DEFUN C:ZZ41()(ZZ412023)(princ))
• (defun ZZ412023()
•   (setvar "cmdecho" 0)
•   (setvar "blipmode" 0)
•   (graphscr);20240608
•   (if(not z1)
•     (SETQ z1 0)
•   )
•   (SETQ str(strcat "\n归具体数值<"(rtos z1 2 2) ">:"))
•   ;(SETQ JD(getint "\n小数保留位数<4>: "))
•   (SETQ z11(getreal str))
•   (if z11
•     (SETQ z1 z11)
•   );20240608
•   (princ "\n请选择要改变厚度的图元2023年09月14日23时06分51秒")
•   
•   (if(setq ss(ssget "X"))
•     (xyp-SubUpd ss 39 Z1)
•   )
•   (princ)
• )