|

楼主 |
发表于 2013-6-25 13:05:59
|
显示全部楼层
来自: 中国辽宁沈阳
本帖最后由 qiminger 于 2013-6-28 13:28 编辑 v3 i/ u! V1 j. v) c
9 \4 I! O. Y/ C! _* c3 d, i
, ^: r0 o# Z7 ?& T+ m4 c十分感谢梁老师提供代码学习~~$ o6 J9 Q" x$ w* A
$ \5 G: Y# i8 l |1 ]$ ?1 S1 P* T# y
提示进来学习的坛友!
$ o8 ^9 t. m" V6 n1 _1 f通过在自定义属性里嵌入宏代码,问题已解决。6 R+ @1 b2 W9 |! g. i, T: p
下面代码在2011版本中均已测试成功。
/ q6 w4 [+ U' q, g5 j6 `
L$ F; B p& X p- |& r3 R' A* W15楼代码,可以取左边字符8 @- g: \1 H' V( B- h$ o6 v& E4 B, H+ F
19楼代码,可以取最后一个下划线后面的字符。
8 d" V, W+ T7 {- k5 w3 d2 s& f* e9 w& h$ ?1 \5 c1 W' m
下面这段代码,可以取第一个下划线前面的字符。$ p1 c9 L2 h4 y; Q
1
5 b% e8 t1 B* a8 ] bdim yfd
+ ^& @* o8 F# ~yfd=part.Extension.CustomPropertyManager("").Set("partno",Left(part.GetTitle,InStr(1,part.GetTitle,"_")-1)) |
|