请问vb.net添加了ARCGIS的mapcontrol控件后如何添加shp文件然后显示出来？

你好 ，试下下面代码，希望对你有用

//这橡族是直接根据路径名称加载

private voidmenuAddShp_Click(object sender， EventArgs e)

{

IWorkspaceFactory pWorkspaceFactory = new ShapefileWorkspaceFactory()

IWorkspace pWorkspace = pWorkspaceFactory.OpenFromFile(@"D:\GIS-Data"，0)

IFeatureWorkspace pFeatureWorkspace =pWorkspace as IFeatureWorkspace

IFeatureClass pFC =pFeatureWorkspace.OpenFeatureClass("continent.shp")

IFeatureLayer pFLayer = new FeatureLayerClass()

pFLayer.FeatureClass = pFC

pFLayer.Name = pFC.AliasName

ILayerpLayer = pFLayer as ILayer

IMappMap = axMapControl1.Map

pMap.AddLayer(pLayer)

axMapControl1.ActiveView.Refresh()

}

/睁局/这段是利用对话框添加

从工具箱往窗体上添加一个OpenFileDialog控件。

private voidmenuAddShp_Click(object sender， EventArgs e)

{

IWorkspaceFactorypWorkspaceFactory = new ShapefileWorkspaceFactory()

openFileDialog1.Filter = "shapefile文件(*.shp)|*.shp"

openFileDialog1.InitialDirectory = @"D:\梁早弊GIS-Data"

openFileDialog1.Multiselect = false

DialogResultpDialogResult = openFileDialog1.ShowDialog()

if(pDialogResult != DialogResult.OK)

return

stringpPath = openFileDialog1.FileName

stringpFolder = Path.GetDirectoryName(pPath)

stringpFileName = Path.GetFileName(pPath)

IWorkspacepWorkspace = pWorkspaceFactory.OpenFromFile(pFolder，0)

IFeatureWorkspacepFeatureWorkspace = pWorkspace as IFeatureWorkspace

IFeatureClasspFC = pFeatureWorkspace.OpenFeatureClass(pFileName)

IFeatureLayerpFLayer = new FeatureLayerClass()

pFLayer.FeatureClass = pFC

pFLayer.Name = pFC.AliasName

ILayerpLayer = pFLayer as ILayer

IMap pMap =axMapControl1.Map

pMap.AddLayer(pLayer)

axMapControl1.ActiveView.Refresh()

}

        从水经注上获取某个县的带行政区分的shp图，打开mapshaper.org网站，此网址可以将shp文件族仔转换成geojson格式，点击Select打开文件选择框，选择shp文件所在位置，然后全选取所有shp图文件，

如下图所示：点击“Import”，

(若出现不能处理bdf文件的燃空tips，则将shp图放入arcgis中，再导出，即可获得utf-8的文件)

右键点击->皮穗瞎add即可添加对应的shp图数据                   右键点击->data->Export Data即可导出数据，

此时我们在页面中可以看到shp文件的展示效果，我们点击右上角的“Export”，导出格式中选择GeoJSON，然后点击“Export”，打开导出的JSON格式文件，可以看到边界面层以一系列JSON格式的点组成。

---