說明:
這是用CAD的VBA功能開發(fā)的小應(yīng)用,主要是參照南方測繪CASS5.0中的功能開發(fā)的,不過界面有點不太好看,這里是完全的VB代碼,感興趣的話,可直接把此DVB工程在CAD中用tools菜單下的load application項加載到CAD程序中使用,同時在加載界面中的startup suite 項目里加進該工程,這樣每次啟動CAD時就自動加載該DVB工程。MYMENU1.MNU是使用本工程功能的CAD菜單代碼,讀者可在CAD中用MENULOAD命令加載到CAD菜單組中使用。
注意,使用本DVB的前提是系統(tǒng)中要裝有VB6.0,否則無法正常運行。
本應(yīng)用包括功能:
1、在CAD中展高程點及點號
2、把CAD圖中的高程點、水深點組成數(shù)據(jù)文件
3、在CAD圖中標注點位坐標,以A,B代表X,Y;
對不滿意的地方可自行修改,以上展點需要的文件格式見例子。
順便附加了一個數(shù)據(jù)文件及CAD圖的例子,供參考。