Quantcast
Channel: AutoCAD顧問
Viewing all articles
Browse latest Browse all 15575

[討論]分享圖面簡體轉繁體VBA程式

$
0
0
大家好~~ 因為最近一直在處理對岸來的圖面,雖然用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都會自動載入 二、做成按鈕 工具 ...

Viewing all articles
Browse latest Browse all 15575

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>