如何编程计算出各导线长度

wanggk

比如 94 号导线长度L=450+250=700,等等，
请求各位大师帮忙，编写一下计算程序，谢谢（VBA,LISP)

重慶崽兒

样例图纸完全没看懂。。。。。。。

wanggk

重慶崽兒 发表于 2015-5-5 23:38
样例图纸完全没看懂。。。。。。。

这是汽车线束电线束生成工艺图纸
1、每一个小图形 表示一个线束对外连接的接插件（类似家用插座，用于连接作用）；
2、每一个接插件孔内 为导线信息，如 107 W  1.25
表示：编号107 导线 颜色为白色（W),导线规格1.25平方毫米。
3、A4为图纸中接插件的顺序号，DJ7022-6.3-21、DJ623-E6.3 表示接插件护套及端子型号。
导线一般情况小至少有两个端头。如107号导线，一端位于A4护套，一端位于A5护套。根据A4与A5之间的长度（230、250）计算出导线长度为480。
依此类推：94导线长度为700（450+250=700）
97导线长度为700（450+250=700）
98导线长度为700（450+250=700）
133导线长度为700（450+190+60）
.......
希望通过VBA或LISP程序根据CAD图面信息得出如下导线长度。
序号        导线号        颜色        规格        长度          
1        94        R/Y        1.25        700          
2        97        R/W        1.25        700          
3        98        R/B        1.25        700          
4        133        P/W        0.5        700          
5        134        B/L        0.5        700          
6        80        Br        0.5        720          
7        81        Br/W        0.5        720          
8        106        L        1.25        480          
9        107        W        1.25        480         

wanggk

希望通过VBA或LISP程序根据CAD图面信息得出如下导线长度。
序号        导线号        颜色        规格        长度           
1        94        R/Y        1.25        700           
2        97        R/W        1.25        700           
3        98        R/B        1.25        700           
4        133        P/W        0.5        700           
5        134        B/L        0.5        700           
6        80        Br        0.5        720           
7        81        Br/W        0.5        720           
8        106        L        1.25        480           
9        107        W        1.25        480  

wyl605

这个找专业安装算量软件，推荐你试试算王这个软件