2013-08-15 明经 AutoLISP 编程(102918348) 群聊记录：(defun xo_gs (str1 / );去除GS编号前面的0 (IF

明经快报

[500w008]宝林 19:35:32

(defun xo_gs (str1 / );去除GS编号前面的0
(IF (wcmatch  str1 "0*")
  (setq str1 (cdr str1))
)
(princ str1)
)

(xo_gs "07")

没出声

明经快报

[tryhi]大海 21:32:33

(wcmatch str1 "0*")

这个成立就不返回吧

[vormittag]桔子 21:35:05

[piecewave]阿波菲 21:35:43

[pzweng][pzweng]路人 21:42:54

[qqimg]201308/{C51E6753-FB38-9F52-7C7F-DE7A595E5F50}.gif[/qqimg]

[loveguo]筠筠 21:45:26

[vormittag]桔子 21:46:32

[qqimg]201308/{7649E66C-0C31-5B72-F61E-5B3455144E6C}.jpg[/qqimg]

[tryhi]大海 21:47:02

[qqimg]201308/{7366E30D-990B-8459-F430-EA8EC5974318}.gif[/qqimg]

[邹锋]Tony 21:48:21

[qqimg]201308/{F89C5871-0C01-29AC-496B-90299827431D}.jpg[/qqimg]

[pzweng][pzweng]路人 21:49:53

[qqimg]201308/{746E210F-312E-5C4F-C192-952D6330791F}.jpg[/qqimg]

[500w008]宝林 21:52:37

要返回的

明经快报

[500w008]宝林 22:09:52

[500w008]宝林 22:10:51

[qqimg]201308/{C74327CC-F647-D3F5-FFA0-148FB2B8BB75}.jpg[/qqimg]

[qqimg]201308/{605CEF2F-86FE-6C6D-D143-CCEDF47FE170}.jpg[/qqimg]

[qqimg]201308/{B14CAC24-887C-B811-C3D6-0FC2ADAABB4C}.jpg[/qqimg]

明经快报

[500w008]宝林 22:26:59

;;;  ML350 主函数                             
;;;  gs_x 图纸编号 必须为gs_x层                            
;;;  tm_x 图名必须为 tm_x 层 
;;;  get_gs_tm 获得图纸编号和图名组表函数  
;;;  sort_gs   对组表选项按gs编号排序函数
;;;  get_tn    获取编号数字函数
;;;  xo_gs     去除GS编号前面的0 函数
;;;  wr_mlbg   绘制表格函数by-gaics

[qqimg]201308/{91AE7D65-5E97-C37F-47D1-1C543EFD8A1D}.gif[/qqimg] 写了这么多 没出来 麻烦

图纸目录生成程序

[qqimg]201308/{C51E6753-FB38-9F52-7C7F-DE7A595E5F50}.gif[/qqimg]

明经快报

[pzweng][pzweng]路人 22:40:38

[qqimg]201308/{C51E6753-FB38-9F52-7C7F-DE7A595E5F50}.gif[/qqimg]

[vormittag]桔子 22:43:29

[qqimg]201308/{C51E6753-FB38-9F52-7C7F-DE7A595E5F50}.gif[/qqimg]

[nameld001]中国草 22:43:35

请问在VBA怎么里判断图元是什么类型文字，还是线

[500w008]宝林 22:43:37

中码了吗

[qqimg]201308/{E82BBE6E-5022-F50A-0574-1A06FDAA0E56}.jpg[/qqimg]

[500w008]宝林 22:44:51

[qqimg]201308/{C51E6753-FB38-9F52-7C7F-DE7A595E5F50}.gif[/qqimg]

[nameld001]中国草 22:47:17

解决，以为typename不实用呢

[vormittag]桔子 22:48:33

路人这个表情一出，我基本上就知道发生了什么事。

[pzweng][pzweng]路人 22:49:14

何解

[500w008]宝林 22:49:50

[qqimg]201308/{509C05A2-0258-02A0-DA4E-6522B20F1E7E}.jpg[/qqimg]

[nameld001]中国草 22:50:07

[qqimg]201308/{C51E6753-FB38-9F52-7C7F-DE7A595E5F50}.gif[/qqimg]

[vormittag]桔子 22:50:09

估计有怪贴出现了。

[pzweng][pzweng]路人 22:50:19

呵呵

[pzweng][pzweng]路人 22:51:11

[500w008]宝林 22:52:17

[yeahyeah]王晓平 22:53:02

晚安各位！

[pzweng][pzweng]路人 22:53:17

[500w008]宝林 22:58:52

明经快报

[死者不舞] 23:57:39

哪位朋友给我个等高线高程归0 的代码