The following VBA example sets the spacing of lines at 120% of the font size, the spacing before paragraphs of 100%, and the spacing after paragraphs of 50%.
Sub Test()
With ActiveShape.Text.Selection
.LineSpacingType = cdrPercentOfPointSizeLineSpacing
.LineSpacing = 120
.BeforeParagraphSpacing = 100
.AfterParagraphSpacing = 50
End With
End Sub