【正文】
r Dim pTriangle As New Triangle Dim Vertex3 As Integer, Vertex1 As Integer, Vertex2 As Integer, Vertex4 As Integer Dim i As Integer, j As Integer, count As Integer Dim minCosine As Double, Cosine As Double Dim Point1 As AcadPoint, Point2 As AcadPoint, Point3 As AcadPoint, Point4 As AcadPoint Dim PointNum As Integer Dim SideSign() As Integer ‘構(gòu)建邊使用情況矩陣 PointNum = If PointNum = 0 Then MsgBox 沒有找到離散的高程點(diǎn) ! Exit Function End If ReDim SideSign(1 To PointNum, 1 To PointNum) For i = 1 To PointNum For j = 1 To PointNum SideSign(i, j) = 0 Next Next 39。 72 GIS與遙感( RS)的結(jié)合 一、 GIS與遙感結(jié)合的必要性 遙感是 GIS重要的數(shù)據(jù)源,有效的數(shù)據(jù)更新手段 1)遙感手段能夠迅速、準(zhǔn)確、綜合性地大范圍地采集環(huán)境和資料數(shù)據(jù) 2)遙感數(shù)據(jù)具有多光譜和的動(dòng)態(tài)多時(shí)相特點(diǎn) 3)為 GIS數(shù)據(jù)更新提供了全方位的手段和動(dòng)態(tài)數(shù)據(jù)源 GIS可為遙感分析提供有用的輔助信息和手段 1)有助于提高遙感數(shù)據(jù)自動(dòng)分類的精度 2)為遙感應(yīng)用分析提供一個(gè)良好的環(huán)境 3)有助于提高遙感信息識(shí)別的精度和效率 二、 GIS與遙感結(jié)合的途徑 (a) 發(fā)展一個(gè)能綜合處理矢量和柵格數(shù)據(jù)的矢柵一體的 GIS (b) 通過國(guó)際標(biāo)準(zhǔn)的空間數(shù)據(jù)交換格式作中間媒介、相互轉(zhuǎn)換 (c) 通過 GIS與遙感系統(tǒng)間建立接口,實(shí)現(xiàn)格式轉(zhuǎn)換與數(shù)據(jù)傳送 重慶衛(wèi)星影像圖 167。房地產(chǎn)開發(fā)和銷售過程中也可以利用 GIS功能進(jìn)行決策和分析。 五、生態(tài)、環(huán)境管理與模擬(Environmental Management and Modeling) 區(qū)域生態(tài)規(guī)劃、環(huán)境現(xiàn)狀評(píng)價(jià)、環(huán)境影響評(píng)價(jià)、污染