提取部件属性值

chenghb

ENTITY/OBJ(100)
STRING/MNO(30),PNO(30),ENO(100,30),STOCK(100,100)
" L+ P3 _% E8 \( [/ e8 j4 RL10:
MASK/63
IDENT/'选择组件',OBJ,CNT,N,RESP
JUMP/L10:,END:,,,RESP
L20:
DO/A1:,I,1,N
ENO=&ATTVL(PART,OBJ(I),'电极编号')
PRINT/ENO
A1:
END:
HALT
大吓帮我看下，编译通不过啊
" Q, A/ H7 u" k1 d, i
/ @& ?0 }: k6 R2 h- t

syj07

做为UG爱好者就是要果断回帖，如果沉了就是我弄沉的很有成就感

ypcopy

$$改成下面的就可以用了
2 P/ D1 O2 f; v& H) a0 E: `; bENTITY/OBJ(100)
, V6 Q* C: Z' d: c: JSTRING/MNO(30),PNO(30),ENO(100,30),STOCK(100,100)
3 c+ o; C& @7 Y* t5 J; @# UL10:
MASK/63
4 p6 P# ]$ ~& |: T) dIDENT/'选择组件',OBJ,CNT,N,RESP
JUMP/L10:,END:,,,RESP
! N  j& ~7 f9 Q0 dL20:
& i, f! s0 b) ?4 T$ P* C. {) q5 ~DO/A1:,I,1,N
ENO(I)=&ATTVL(OBJ(I),'电极编号',iferr,L20
PRINT/ENO(I)
A1:
END:
5 ?1 Z* H* {: W: VHALT

ypcopy

ypcopy 发表于 2014-10-27 22:04
9 g2 l& x4 K5 j' S" `$ d0 e$$改成下面的就可以用了
ENTITY/OBJ(100)
: @6 D$ p  p8 ~* l' TSTRING/MNO(30),PNO(30),ENO(100,30),STOCK(100,100)

  s* I' Y" k4 z; R: L见      图
# K. B. i3 [3 b4 p0 Z; u

chenghb

我试了也不行啊。真是郁闷

ypcopy

chenghb 发表于 2014-10-27 22:29
我试了也不行啊。真是郁闷

试试这个了

chenghb

感谢啊。我数组的格式没搞对。