Set Data Frame Display Units

Question

Using VB.NET, I created a function that will always start ArcMap with a certain Projected Coordinate System. By default, the Map Units and Display Units (Data Frame) are set to Meters, when using this Spatial Reference. How can I change the Display Units?  I know how to change the Map Units to Kilometers (10), but how can I modify the code to change the Display Units?
 Dim dataView As IActiveView = My.ArcMap.Document.ActiveView  dataView.ScreenDisplay.DisplayTransformation.Units = 10  dataView.Refresh()

Hornbydd · Accepted Answer

The code you need is:' 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