Dim mapDocument As IMapDocument = New MapDocument
mapDocument.Open("C:\temp\myMap_v10.mxd")
DirectCast(mapDocument, IDocumentVersion).DocumentVersion = esriArcGISVersion.esriArcGISVersion93
mapDocument.SaveAs("C:\temp\myMap_v93.mxd")
mapDocument.Close()