yangsanmyth 发表于 2012-1-1 21:04:37

vba怎么在不改变图层颜色的情况下,改变颜色控制里的颜色?

vba怎么在不改变图层颜色的情况下,改变颜色控制里的颜色?请大虾赐教。

vlisp2012 发表于 2012-1-2 10:25:29

我做了一个子程序:
(defun ys (co)
(command "CECOLOR" co))

可以在程序中直接引用:
------
(command (ys 1) "text" "j" "m" (wu pp1) (getvar "textsize") 0.0 (strcat(rtos l1 2 1)))
(command (ys 2) "text" "j" "m" (wu pp2) (getvar "textsize") 0.0 (strcat(rtos l2 2 1)))
(command (ys 3) "text" "j" "m" (wu pp3) (getvar "textsize") 0.0 (strcat(rtos l3 2 1)))
(command (ys 4) "text" "j" "m" (wu pp4) (getvar "textsize") 0.0 (strcat(rtos l4 2 1)))
------
我是用不同颜色的文字表达多边形的顺序的。
页: [1]
查看完整版本: vba怎么在不改变图层颜色的情况下,改变颜色控制里的颜色?