Dim dataView As IActiveView = My.ArcMap.Document.ActiveView dataView.ScreenDisplay.DisplayTransformation.Units = 10 dataView.Refresh()
Solved! Go to Solution.
' Get a handle on DataFrame Dim pMap as IMap pMap = My.ArcMap.Document.FocusMap ' Set Display Units to meters pMap.DistanceUnits = esriMeters ' Set Map units pMap.MapUnits = esriMeters
' Get a handle on DataFrame Dim pMap as IMap pMap = My.ArcMap.Document.FocusMap ' Set Display Units to meters pMap.DistanceUnits = esriMeters ' Set Map units pMap.MapUnits = esriMeters