[求助]：cad单行文字能旋转吗？？？？？

陌生人 · 发表于 2004-7-6 13:35:59

原来如此。
我挺喜欢你写的程序，虽然我不懂vba,不过我会看处理的思路。以后请多指教

雪山飞狐(lzh) · 发表于 2004-7-6 20:43:12

最初由陌生人发布
[B]原来如此。
我挺喜欢你写的程序，虽然我不懂vba,不过我会看处理的思路。以后请多指教 [/B]

陌生人长老过谦了，应该是互相讨教才对，：）

自由的鱼 · 发表于 2004-7-8 23:49:16

L兄可是VB高手~~~~

陌生人 · 发表于 2004-7-10 20:45:47

vba用 left， right 可以自动识别汉字
vl中有这样的函数么？....

雪山飞狐(lzh) · 发表于 2004-7-10 22:10:24

可以分解汉字，判断一下Ascii码，
偶也玩玩Lisp，：）
(defun str2Chrs(strA / pAsc)
(setq pAsc (if (< (ascii strA) 128) 1 2))
(cond ((> (strlen strA) pAsc)
(cons (substr strA 1 pAsc) (str2Chrs (substr strA (1+ pAsc)))))
((list (substr strA 1 pAsc))))
)

陌生人 · 发表于 2004-7-11 05:44:17

你的分解text vba程序，第一个字在原text的下面，能调上去，到原位么？

雪山飞狐(lzh) · 发表于 2004-7-11 08:11:03

Mtext的插入点在左上角，Text默认在左下角，调整一下即可，实际上应该让用户选择插入点

紫番茄 · 发表于 2004-7-11 14:24:57

可以呀就在文字工具里把生行变成竖的就是了

账号		自动登录	找回密码
密码			立即注册