arcmap實例-資料下載頁
2025-03-10 23:37本頁面
【正文】 E的開發(fā)環(huán)境 * ? 硬件： Intel Pentuim 計算機 512M 以上內(nèi)存 ? 軟件： Windows 2023/XP 。 Visual Basic 6和 AE控件 * VB6和 AE (1)安裝 (2)安裝 AE,配置正確的 license文件 * ?STEP 2： 安裝完成后，在光盤目錄 VB6SP6B中找到，將 VB6 升級到最新版本。SP6 是微軟公司對其產(chǎn)品VB6 的第 6次更新 ,修正了以前的一些問題 * VB中使用 AE ? 認識 VB 6的集成開發(fā)環(huán)境 ? 在 VB 6中加載 ESRI MapControl控件 ? 添加控件及數(shù)據(jù) * 認識 VB6的集成開發(fā)環(huán)境 VB集成開發(fā)環(huán)境 * 設(shè)置 VB選項，明確變量類型 在準備開始一個 工程時，應(yīng)該在 確保 VB的工程中 使用到的變量的 類型都是 明確聲 明 的，這樣可以 減少發(fā)生錯誤的 可能性，這是一 個很好的編程習(xí) 慣。 Option Explicit * VB6中常用的控件庫 * 在 VB6中加載 AE控件 STEP1:啟動Visual Basic 6 ,在開始出現(xiàn)的向?qū)е羞x擇新建工程 (標準 EXE) . 確定 STEP2:在工具欄上點右鍵 (工具欄位于 VB窗口的左邊 ),在出現(xiàn)的右鍵菜單中點擊” 部件 ” 命令 . * 拖放：在窗體上放置 MapControl控件 調(diào)整控件的大小及位置 選中 * 建立包含 MapControl控件的缺省工程 保存工程模板：將窗文件 (.frm)及工程文件 (.vbp)保存到 C:\Program Files\Microsoft Visual Studio\VB98\Template\Projects Map 控件 * 在 VB環(huán)境中加載 Mapcontrol的步驟 第一步： 首先透過 “ 部件 ” 在 form工具箱中添 加 MapControl控件，然后通過拖動雙擊 map控件 的方法，將控件添加到 form窗體之上，并調(diào) 整大小。 * 選擇將要顯示在地圖上的數(shù)據(jù) 你可以通過 地圖控件的屬性頁上的屬性設(shè)置功能，指定將被顯示在地圖上的數(shù)據(jù) . 第二步 ：在地圖控件上方點擊右鍵，出現(xiàn)右鍵菜單 .在 出現(xiàn)的右鍵菜單中選擇 “ Properties…” 命令，以顯示 控件的屬性頁。 * 第三步： 點擊圖層列表框中的圖層 ，然后點 擊 “ 屬性 ” 。可對圖層的屬性進行設(shè)置 添加地圖 文檔文件 * 第四步： 運行工程在工具欄上 點擊運行按鈕測試你的程序，如果要停止程序運行在 VB工具欄上 點擊停止按鈕 最后一步，保存工程 * 添加代碼實現(xiàn)放縮功能 例子： 在 form窗體上加載地圖控件， 4個命令按鈕分別實現(xiàn)放大、縮小、全圖顯示、退出的功能，當鼠標在 map地圖上點擊左鍵時實現(xiàn)拉框放大，點擊右鍵時實現(xiàn)漫游功能。 //實現(xiàn)放大的代碼 Dim pEnv As Set pEnv = New Set pEnv = , , True = pEnv //實現(xiàn)縮小的代碼 ?? , , True ?? * 演示 //MouseDown函數(shù)中的代碼 If Button = vbLeftButton Then =_ ElseIf Button = vbRightButton Then End If //實現(xiàn)全圖顯示的代碼 Set = //實現(xiàn)退出的代碼 End * 本講回顧，作業(yè) GIS軟件開發(fā)的三種模式 AE的類庫及其關(guān)系 VB+AE開發(fā)環(huán)境的熟悉 * 演講完畢，謝謝觀看！
規(guī)章制度相關(guān)推薦
鄂ICP備17016276號-1