arcgis导出图

发布网友 发布时间：2022-04-23 02:23

我来回答

共4个回答

热心网友 时间：2023-01-08 23:35

可以直接用file-export map 然后选择导出你觉得你要的格式的图
一般是jpg
然后可以打印jpg图。而且一般导出jpg格式的话dpi选择高一点，肯定是彩色的，而且很清晰

热心网友 时间：2023-01-09 00:53

导出图不用打印用导出就行
"File"---"export map"----下面option general 把分辨率resolution调大
format 那边设彩色就行

热心网友 时间：2023-01-09 02:28

Sub outputMapBlock()
If (MsgBox("是否开始导出图片，按指定范围？", vbYesNo) = vbNo) Then Exit Sub

Dim pMxDoc As IMxDocument
Set pMxDoc = ThisDocument
Dim pActiveView As IActiveView
Set pActiveView = pMxDoc.ActiveView

Dim pExport As IExport
Set pExport = New ExportJPEG
pExport.ExportFileName = "C:\Test0.jpg"
pExport.Resolution = 300

Dim exportRECT As tagRECT
With exportRECT
.Left = 100
.Right = 600
.Top = 100
.bottom = 600
End With
' exportRECT 表示导出的图片绘制范围

Dim pPixelBoundsEnv As IEnvelope
Set pPixelBoundsEnv = New Envelope
pPixelBoundsEnv.PutCoords 605000, 100000, 606000, 101000 '指定导出的地形范围

Dim pE As IEnvelope
Set pE = New Envelope
pE.XMin = 0
pE.XMax = 700
pE.YMin = 0
pE.YMax = 700
pExport.PixelBounds = pE '图片的大小

Dim hDC As Long
hDC = pExport.StartExporting

pActiveView.Extent = pPixelBoundsEnv

pActiveView.Output hDC, pExport.Resolution, exportRECT, pPixelBoundsEnv, Nothing

pExport.FinishExporting
pExport.Cleanup
End Sub

注：请在arcmap vba里面运行

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/yuxi2000/archive/2009/06/16/42697.aspx

热心网友 时间：2023-01-09 04:19

http://gisman.blog.163.com/blog/static/34493388200972024813188/
给你找了个步骤，应该可以解决你的问题了～