大家好~~
因為最近一直在處理對岸來的圖面,雖然用GBCBIG可以看簡體字,可是要在台灣發包,還是得轉成繁體字
用了一些現成的工具都覺得不理想,網路上的VB有些是用.NET的指令,或用LCMapString這個指令,可是我怎麼試都試不出來,最後只好自己東拼西湊弄出這個簡轉繁的工具
基本上就是找圖面上的文字,包括一般單行及多行文字、圖塊裡的文字以及尺寸線裡的文字,將簡體字轉成UNICODE,對照出繁體字的UNICODE,再轉成繁體字的字串,一次處理整張圖
因為在找資料的過程中,發現似乎不少人都有相同的困擾,程式也部份借用前輩們的心血,所以就想藉這個討論區提供大家參考,希望對大家有幫助
VB的功力普普通通,第一次發表,請大家多多指教~~
(使用於AUTOCAD 2008 / WIN 7 32bit)
同事說圖層和表格的簡體字也要繁體化,所以程式有做了修改
至於VBA的使用方式如下
我將程式另外存成一個dvb檔,方便匯入AUTOCAD使用:
(以AUTOCAD 2008為例)
做兩個步驟才能使用VBA的巨集,一個是載入VBA的套件,就是附件裡的ACADProject.dvb,以及將功能做成按鈕以方便使用。
一、載入VBA套件
命令列輸入APPLOAD
點啟動套件的”內容”
點”加入”
選”ACADProject”後,點”加入”
點”關閉”
之後每次啟動AUTOCAD都會自動載入
二、做成按鈕
工具 ...
↧